用delphi安装硬件驱动，哪位有例子啊？*.inf和*.sys型的

[haochin]

共有两个文件，一个是a.inf,一个是a.sys

我想用delphi静默安装这个驱动，大家给个例子啊。谢谢

谢。

简单一点的就行，不需要那么复杂


另，有没有人知道用inno setup怎么样安装上面所讲的驱动呢？

[gyk120]

inf一般是右键点击然后选择安装的，不知道和SCM控制的安装有什么不同

[gyk120]

SCM就用CreateService注册就可以了

[haochin]

没有人知道怎么用delphi安装.inf驱动吗？

[haochin]

大家都来看看吧。。帮帮帮忙。

[okmnji79513]

记得WDK里有例子源码，不知道行不行改成Delphi的。

[haochin]

这个问题困扰我多时了。。


现手头有一软件基本已基本开发完，差不多要打包上市了，软件有连接一硬件设备。

止前需要客户插入硬件后，手动安装驱动。不方便啊。。有些客户都不懂装驱动呢。

[haochin]

顶上去，顶到有答案为止。

[gaominjie]

我也想知道，帮顶

[haochin]

我也想知道，帮顶

[iqyely]

同样关注下

[iamduo]

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


// 安装INF文件
// exp. InstallINF('C:\XYZ.inf', 0) ;

[haochin]

[Quote=引用 11 楼 iamduo 的回复:]
function InstallINF(const PathName: string;const hParent: HWND): Boolean;
var hh:HINST;
begin
hh:=ShellExecute(hParent,PChar('open'),PAnsiChar('rundll32.exe'),PAnsiChar('setupapi,InstallHinfSecti……
[/Quote]

谢谢，现在湖南老家休假，没有硬件测试。回公司再试试。

[huangheguyun]

做个标记，学习了！

[haochin]

还是不行。望有高人再帮帮忙。

[haochin]

还是不行。望有高人再帮帮忙。