Vokabeltrainer

[ELNeo]

@ TheAn00bis: Hört sich für den Moment wirklich ZU kompliziert an Trotzdem DANKE!

@ 3_of_8: Es tauchen noch einige Fehler auf, die ich nicht beheben kann:

Delphi-Quellcode:

var vok:array of Tvokx;

procedure TForm1.Button1Click(Sender: TObject);
var vokx:Tvokx;
begin
 setlength(vok,length(vok+1)); //[Fehler] VokabeltrainerUnit.pas(61): Operator ist auf diesen Operandentyp nicht anwendbar
 vok[high(vok)]:=vokx;
end;

procedure TForm1.Speichern1Click(Sender: TObject);
var f:file of Tvokx
    i:cardinal; //[Fehler] VokabeltrainerUnit.pas(67): Ungültige Compileranweisung: 'i'
    current:Tvokx;
begin
 assignfile(f,'vokabeln');
 rewrite(f);
 for i:=0 to high(vok) do
 begin
  current:=vok[i];
  write(f,current);
 end;
 closefile(f);
end;

Wäre nett, wenn du dich nochmal kurz damit beschäftigen könntest