Thema: Delphi File of record speichern

Einzelnen Beitrag anzeigen

Benutzerbild von Jens Schumann
Jens Schumann

Registriert seit: 27. Apr 2003
Ort: Bad Honnef
1.644 Beiträge
 
Delphi 2009 Professional
 
#14

Re: File of record speichern

  Alt 27. Okt 2006, 20:41
Zitat von KeMa:
Hallo zusammen,

kann mir auch jemand sagen wie ich dieses Format speichern und öffnen kann?

Delphi-Quellcode:
Type TField = record
     Field : array of String [50]
end;

Type TDatSet = record
     DatSet : array of TField;
     DatExt : array of TField;
     DSFLength : Longword;
     DEFLength : Longword;
     DSLength : Longword;
     Name : String [20];
     Date : String [10];
end;

Type TDBFrame = record
     Data : array of TDatSet;
     System : array of TDatSet;
     DatLength : Longword;
     SysLength : Longword;
     Name : String[20];
end;

Var

DBFrame : TDBFrame;
Isch werd noch amol blöd mit Ding hier...
Beim Speichern wird der Autor sicherlich mit der Anzahl der TField über das Array iterieren und die Records einzeln abspeichern.
Beim Auslesen musst Du genau das gleiche machen. Nur musst Du wissen wieviel Records von TField kommen. Dir Information ist bestimmt irgendwo gespeichert. Deshalb musst Du mit den Felder experimentieren, die Length enthalten. Darin ist bestimmt die Anzahl der Records in DatSet und so gespeichert.

[edit=alcaeus]Delphi-Tags im zitierten Beitrag eingefuegt. Mfg, alcaeus[/edit]
I come from outer space to save the human race
  Mit Zitat antworten Zitat