Delphi怎么打开VXD设备
编号:QA001715
建立日期: 1999年9月15日 最后修改日期:1999年9月15日
所属类别:
liwei:
我所用操作系统:win95
我所用编程工具::VtoolsD203,Delphi40
遇到的问题:
我用VtoolD.VC50编译了一个无任何功能的VxD,将其放至windows\system下,在Delphi中用CreateFile调用结果总不成功,GetLastError返回错误代码126,也不知是什么意思。
VxD是由QuickVxD生成的,在QuickVxD中,我选了Dynamically Loadable,Windows95ControlMessage中只选了SYS_DYNAMIC_DEVICE_EXIT和SYS_DYNAMIC_DEVICE_INIT, 其他均为默认值。
Delphi相应代码如下:
procedure TForm1.Button1Click(Sender:TObject);
var
hVxD : THandle;
begin
hVxD := CreateFile('\\.\test.vxd',0,0,nil,0,
FILE_FLAG_DELETE_ON_CLOSE,0);
{{其中,第四个参数也用过CREATE_NEW,OPEN_EXISTING,都一样}}
。。。。。
end;
实在不明白是怎么回事,请专家帮忙指教。多谢多谢!
回答:
使用这样的语句:
hVxD := CreateFile('\\.\test.vxd' ,0,0,nil, CREATE_NEW,
FILE_FLAG_DELETE_ON_CLOSE,0);
此问题由李海回答。
| |
|
|
| |
|
|