Seit Delphi2009 ist CHAR = WideChar (2 Byte) Utf16
Ändere das auf:
Zitat:
type T_SerNum = record
wsernum: array[0..15] of AnsiChar; // Ansichar (1 Byte)
end;
type T_Descript = record
wdes: array[0..63] of AnsiChar; // Ansichar (1 Byte)
end;
Hier ein link:
https://www.embarcadero.com/images/o...code181213.pdf
Und auch das stöbern hier wird Dir helfen