.. ein Problem dürfte sein, dass in D10 mit
UniCode gearbeitet wird.
Da hat dann ein Char ein Größe von 2 Byte.
Solche Record-Strukturen dürften dann nicht mehr ordnungsgemäß arbeiten.
Delphi-Quellcode:
TNCB =
packed record
ncb_command: Char;
// command code
ncb_retcode: Char;
// return code
ncb_lsn: Char;
// local session number
ncb_num: Char;
// number of our network name
ncb_buffer: PChar;
// address of message buffer
ncb_length: Word;
// size of message buffer
ncb_callname: TNCBName;
// blank-padded name of remote
ncb_name: TNCBName;
// our blank-padded netname
ncb_rto: Char;
// rcv timeout/retry count
ncb_sto: Char;
// send timeout/sys timeout
ncb_post: TNCBPostProc;
// POST routine address
ncb_lana_num: Char;
// lana (adapter) number
ncb_cmd_cplt: Char;
// 0xff => commmand pending
ncb_reserve:
array[0..9]
of Char;
// reserved, used by BIOS
ncb_event: THandle;
// HANDLE to Win32 event which
// will be set to the signalled
// state when an ASYNCH command
// completes
end;
Ein erster Schritt wäre dann Char durch AnsiChar oder Byte zu ersetzen.
Grüße
Klaus