How to install an INF file using Delphi

If you need to install an "inf" file using Delphi, you could use the next code:

~~~~~~~~~~~~~~~~~~~~~~~~~
{
Usage:
   InstallINF('C:\XYZ.inf', 0) ;
}
uses
   ShellAPI;

function InstallINF(const PathName: string; hParent: HWND): Boolean;
var
   instance: HINST;
begin
   instance := ShellExecute(hParent,
     PChar('open'),
     PChar('rundll32.exe'),
     PChar('setupapi,InstallHinfSection
           DefaultInstall 132 ' + PathName),
     nil,
     SW_HIDE) ;

   Result := instance > 32;
end;

~~~~~~~~~~~~~~~~~~~~~~~~~

Delphi tips navigator:
» How to determine if a string matches a pattern
« Delphi Enum to String

Previous

• 1
• 2
• 3
• 4
• 5

Next