如何在delphi下控制VXD,我需要一个例子(simply source code)(100分)

好象用createfile,然后用bind.但是
我没有成功过。
请各位高手帮忙。

你必须知道vxd的service 接口,

然后使用createfile和DeviceIoControl,其实用Visual C++编最好

Sample Code:

var
hDevice:THandle;

hDevcie:=CreateFile('sample.vxd',0,0,nil,0,
FILE_FLAG_DELETE_ON_CLOSE,nil);

if hDevcie <> 0 then
begin
DeviceIoControl(hdevcie,FUNC_NUM,
pszInBuf,strlen(pszInBuf),nil,0,@cbBytesReturned,nil);

//you can search help for usage of DeviceIoControl

CloseHandle(hDevice);
end;

接受答案了.