Einzelnen Beitrag anzeigen

theNick

Registriert seit: 22. Mär 2006
15 Beiträge
 
#9

Re: Array in externe Datei ein- und auslesen

  Alt 22. Mär 2006, 15:44
ich habe gerade diesen Thread gefunden, der genau mein problem beschreibt.
Ich habe es natürlich gleich ausprobiert doch er zeigt mir den fehler ->

[Fehler] Unit1.pas(60): E2155 Typ 'TSchuelerFeld' benötigt Finalization - nicht im Dateityp erlaubt

veilleicht kann mir ja jemand helfen

Delphi-Quellcode:
type
  tSchueler = record
                nachname : String[25];
                vorname : String[20];
                stufe : Byte;
                klasse : string;
              end;
  TSchuelerFeld = array[1..200] of TSchueler;

var
  Form1: TForm1;
  x: integer;
  SchuelerFeld : TSchuelerFeld;
  f: file of TSchuelerFeld;

{array wird gefüllt ...}

procedure TForm1.ButtonespeichernClick(Sender: TObject);
begin
{Array abspeichern}
    AssignFile(f, 'C:\Sportunterricht.xyz');
    ReWrite(f);
    Write(f, SchuelerFeld);
    CloseFile(f);
end;

procedure TForm1.ButtonladenClick(Sender: TObject);
begin
{Array laden}
    AssignFile(f, 'C:\Sportunterricht.xyz');
    Reset(f);
    Read(f, SchuelerFeld);
    CloseFile(f);
end;
  Mit Zitat antworten Zitat