deviceiocontrol()在delphi中的应用？

这是我的定义
 var  
       t:bool;
       TT_START_802:dword; // fsctl_get_compression;

begin
 t:=deviceiocontrol(hwd,TT_START_802,nil,0,nil,0,cb,nil);
   if t=false then  Messagebox(handle,\'chuanshucuowu\',\'错误\',mb_iconstop or mb_ok); ;
   Edit1.Text:=inttostr(getlasterror());
 end;
但是进入不到我的case TT_START_802:语句中去在softICE中设置断点也不进入。
 该怎么定义此控制代码呢

解决了 给他一个常值就行了 但要和TT_START_802的值相等就行了

这是我的定义
       TT_START_802:dword; // fsctl_get_compression;

还真没猜错,TT_START_802在这里是个变量,你不给它赋值怎么行?
t:=deviceiocontrol(hwd,TT_START_802,nil,0,nil,0,cb,nil);
中的cb是否应该为*cb?

TT_START_802  按照CTL_CODE(file_device_unknown,0x802,,METHOD_BUFFERED,FILE_ANY_ACCESS)定义好了,如果在VC中直接用,TT_START_802 就能 够进入相应的case语句,到了delphi中就不行了
在delphi中该怎么定义呢 是不是要用宏

不是用嵌入汇编复值的吧,我试过Delphi的嵌入汇编不支持远跳转.开个玩笑,不过有关Delphi的这个属实

我说...
不会TT_START_802没赋值这么简单吧。
如果是这样，那我晕！！！ :)

大家过来看看了
      自己顶一下