Es funktioniert doch noch nicht
1. Fehlermeldung:
function LoadFromFile(Source: string);
benötigt Ereigenistyp. Ist das dann auch 'string' ?
2. Fehler:
Delphi-Quellcode:
procedure SaveToFile(Dest: string);
var f: file of TDatensatz;
I: Cardinal;
begin
try
assignFile(f, Dest);
reWrite(f); //oder reset(f)
for I := low(Tabelle) to high(Tabelle) do
write(f, Tabelle[i]);
finally
closeFile(f);
end;
end;
Das Programm stürzt wegen Zeile 9 ab.
Delphi-Quellcode:
LoadFromFile('C:\test.dat');
if high(Tabelle) > 0 then
begin
Tabelle[0].Vorname := Edit1.Text;
//Edit2.Text := Tabelle[0].Nachname;
end;
SaveToFile('C:\test.dat');
So kann man doch nur an die Stelle 0 der Tabelle schreiben!?
Helft mir bitte
