Meine Testdatei hatte den Inhalt A-K #0 L-Z. Eine Änderung auf Shortstring (=> string[255]) war nicht zielführend. Erst das Umstellen auf Streams brachte dann das gewünschte Ergebnis, da sich diese nicht um #0 und Konsorten scheren. Übrigens:
Zitat:
Delphi-Quellcode:
SetLength(MailData, 32);
FileContents.ReadBuffer(Pointer(MailData), 32);
Es wäre vielleicht weniger fehleranfällig, wenn man das so machte:
Delphi-Quellcode:
const
LENGTH_REQUIRED = 32;
begin
...
SetLength(MailData, LENGTH_REQUIRED);
FileContents.ReadBuffer(Pointer(MailData), Length(MailData));