Achsoo damit bin ich doch schonmal ein stück weiter ^^
Aber in diesem Code beispielsweise ließt er immer einen Namen z.B ARCHIV_FILE_NUMMER_1 dieser name wird ja nicht immer ein byte groß sein also warum funktioniert es trotzdem ?
Delphi-Quellcode:
BlockRead(ArchivFile.ArchivFile, SSize, SizeOf(SSize));
// zuerst wird ausgelesen, wie groß der Dateiname ist
SetLength(s,SSize);
// dann wird S diese Länge zugewiesen
BlockRead(ArchivFile.ArchivFile,s[1],SSize);
// anschließend kann der Dateiname aus der Archivdatei
// ausgelesen werden.
BlockRead(ArchivFile.ArchivFile,Size,SizeOf(Size));
// die Größe der Datei