安装一个INF的内部应用程序

最新推荐文章于 2023-01-11 13:24:20 发布

原创最新推荐文章于 2023-01-11 13:24:20 发布 · 627 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#硬件驱动 #application #internet #path #function #windows

本文介绍了一种在Windows系统中通过编程方式安装INF文件的方法。INF文件主要用于安装硬件驱动程序，但也可以用于安装某些内部应用程序。文章提供了一个Delphi示例代码，展示了如何使用ShellExecute函数来调用rundll32.exe并指定SetupApi来完成INF文件的安装。

INF是一个文本文件被微软用作安装硬件驱动程序windows API。
然而，有些时候我们可以安装一个内部应用程序。
下面是这样做的，请大家试试。
首先在uses里要引用ShellApi单元。

function Install_INF(const Path: string; WHandle: HWND): Boolean;
var HINSTANCE: HINST; // A handle to the application instance
begin
  HINSTANCE := ShellExecute(WHandle,
  PChar('open'), PChar('rundll32.exe'),
  PChar('SetupApi,InstallHinfSection DefaultInstall 132 ' + Path),
         nil, SW_HIDE);
  Result := HINSTANCE > 32;
end;
  

                            
procedure TForm1.Button1Click(Sender: TObject);
begin
  {Normally, IE.inf file has been using to repair Internet Explorer}
  if Install_INF('C:/WINDOWS/INF/IE.INF', 0) = False then Exit;
end;