'function GSGW32_Mount(idx:Integer; Drive:Char; a3:Int64; const
'ImgFile:PChar):Cardinal;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_Umount(Drive:Char):Cardinal;stdcall; external 'RNDINTER1.dll';
'
'function GSGW32_GetStatus(Driver:Char; idx:Integer; a3:Integer;
'ImgFile:PChar):Cardinal;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_LoadDriver:Integer;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_UnloadDriver:Integer;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_GetAllNetDiskDrive(
'lpOutBuffer:PChar):Cardinal;stdcall;external 'RNDINTER.dll';
'ImgFile:PChar):Cardinal;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_Umount(Drive:Char):Cardinal;stdcall; external 'RNDINTER1.dll';
'
'function GSGW32_GetStatus(Driver:Char; idx:Integer; a3:Integer;
'ImgFile:PChar):Cardinal;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_LoadDriver:Integer;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_UnloadDriver:Integer;stdcall; external 'RNDINTER.dll';
'
'function GSGW32_GetAllNetDiskDrive(
'lpOutBuffer:PChar):Cardinal;stdcall;external 'RNDINTER.dll';
'ImgFile:PChar):Cardinal;stdcall; external 'RNDINTER.dll';
Private Type Int64
LOW_DWORD As Long
HIG_DWORD As Long
End Type
Private Declare Sub GSGW32_Mount Lib "RNDINTER.dll" (idx As Long, Drive As Byte, a3 As Int64, ImgFile As String)
'
'function GSGW32_Umount(Drive:Char):Cardinal;stdcall; external 'RNDINTER1.dll';
Private Declare Sub GSGW32_Umount Lib "RNDINTER1.dll" (Drive As Byte)
'
'function GSGW32_GetStatus(Driver:Char; idx:Integer; a3:Integer; '这里的 a3 怎么不是 Int64 了?
'ImgFile:PChar):Cardinal;stdcall; external 'RNDINTER.dll';
Private Declare Sub GSGW32_GetStatus Lib "RNDINTER.dll" (Driver As Byte, idx As Integer, a3 As Integer, ImgFile As String)
'
'function GSGW32_LoadDriver:Integer;stdcall; external 'RNDINTER.dll';
Private Declare Function GSGW32_LoadDriver Lib "RNDINTER.dll" () As Long
'
'function GSGW32_UnloadDriver:Integer;stdcall; external 'RNDINTER.dll';
Private Declare Function GSGW32_UnloadDriver Lib "RNDINTER.dll" () As Long
'
'function GSGW32_GetAllNetDiskDrive(lpOutBuffer:PChar):Cardinal;stdcall;external 'RNDINTER.dll';
Private Declare Sub GSGW32_GetAllNetDiskDrive Lib "RNDINTER.dll" (lpOutBuffer As String)