bei string in TFileStream kommt 1 Zeichen zu wenig an...

[schlecki]

du musst die einzelnen Strings noch auf die korrekte Länge bringen...

Zitat:

Delphi-Quellcode:

// Lesen
    f.ReadBuffer(y,SizeOf(integer));
    SetLength(AllTitel[x].Titel,y); // <---
    f.ReadBuffer(AllTitel[x].Titel[1],y);