Dear 
$80FF;

IOCTL_SSSNC_SET_INITDIR = (FILE_DEVICE_KRNLDRVR * $10000) or ((CTRL_DRIVER_INIT) * $100) or ((1) * $4) or ((METHOD_BUFFERED) * $1) or ((FILE_ANY_ACCESS) * $4000); // ' Set Optional Skip off

你想想 標紅字的地方,Complie時會出現,Overflow in conversion or arithmetic operation的錯誤,試問有解嗎,各位先進!

FILE_DEVICE_KRNLDRVR =FILE_DEVICE_KRNLDRVR * $10000) or ((CTRL_DRIVER_INIT) * $100) or ((1) * $4) or ((METHOD_BUFFERED) * $1) or ((FILE_ANY_ACCESS) * $4000); // ' Set Optional Skip off

Dear 
這個檔案是從VB,轉過來的運算結果是$8~~~~~~~應該有溢位問題,試問delphi下的#define能定義成Unsigned的嗎?

c
xxxxx $yyyyUL

delphi

xxxxx: LongInt = $yyyyy;
or
xxxxx = LongInt(1000);

應該自己去查Help
===================引 用 bill534 文 章===================
Dear
這個檔案是從VB,轉過來的運算結果是$8~~~~~~~應該有溢位問題,試問delphi下的#define能定義成Unsigned的嗎?

編輯記錄

有'FILE_DEVICE_KRNLDRVR'的都會有"Constant expression expected"的ERROR,喔天啊....,
英語也有看没有懂的(少小不努力,老大.......),Why.............Help.........!!


IOCTL_SSSNC_SET_INITDIR = ((FILE_DEVICE_KRNLDRVR) * $10000) or ((CTRL_DRIVER_INIT) * $100) or ((2) * $4) or ((METHOD_BUFFERED) * $1) or ((FILE_ANY_ACCESS) * $4000);