Thema: Delphi Ein Array Speichern

Einzelnen Beitrag anzeigen

arnoldo

Registriert seit: 8. Dez 2002
Ort: Berlin
131 Beiträge
 
Delphi 7 Personal
 
#5
  Alt 2. Mär 2003, 18:52
Hallo hds_chris,

also ich würde das ganze folgendermaßen angehen:

1. den datentyp per record definieren

Delphi-Quellcode:
type daten=record
      titel:string[20];
      nummer:integer;
     end;
     feld=array[1..500] of daten;

var
  Form1: TForm1;
  datei:file of feld;
  liste:feld;
2. Prozeduren schreiben

Delphi-Quellcode:
procedure laden;
begin
 assignfile(datei,'daten.dat');
 reset(datei);
 read(datei,liste);
 closefile(datei);
end;

procedure speichern;
begin
 assignfile(datei,'daten.dat');
 rewrite(datei);
 write(datei,liste);
 closefile(datei);
end;
So, ich hoffe ich konnte Dir helfen...
  Mit Zitat antworten Zitat