Kodlar :
Kod:
{
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;