| |
|
|
Normann Strübli | Hi,
Perhaps can your me there time help: have subesquent Source-statement whom I übersetzten would like:
... char iobuffer[3]; ULONG res; iobuffer[0]=0; iobuffer[1]=0; iobuffer[2]=1; if ((res = IowKitWrite(ioHandle, 0, &iobuffer, sizeof(iobuffer))) != 3) ...
and the have I then from it made: ... dim data#,3 byte data#,0=0 byte data#,1=0 byte data#,2=1 nwritten& = IowKitWrite(Iohandle&,0,data#,@sizeof(data#)) ...
so stehts somewhere in the Help the appeal: Public Declare Function IowKitWrite _ Lib iowkit _ (ByVal iowHandle As Long, _ ByVal numPipe As Long, _ ByRef buffer As byte, _ ByVal length As Long _ ) _ As Long
I faith I custom there time one small Wink with something
|
|
|
| |
|
|