Also es handelt sich bei der Datei um ein reines Textfile.
Ich würde es gerne hiermit versuchen.
Jedoch weis ich nicht ob dies auch mit Textdateien möglich ist.
Delphi-Quellcode:
TDaten = record // oder packed record --> siehe Dokumentation
// hier die Daten in der Reihenfolge, in der sie in der Dokumentation stehen
end;
procedure LoadFromFile(AFileName: string);
begin
// per Stream in record lesen...
end;
Hier ein kleiner Auszug aus dem File:
Delphi-Quellcode:
00K
01ADR_APO
02UPD
0320060515
0420060501
05ABDATA DATEN-SERVICE
06Adressen
071001
0815
00F
0101
02Key_ADR
031
040
05V
065
07NU1
00F
0102
02Firmenname
030
040
05V
0640
07AN1
MfG, Ronny