Guten Morgen,
ich habe folgenden Script zum Speichern von Daten in einer Datei geschrieben und erhalte einen Fehler in Zeile 6.
Woran kanns liegen? (Delphi 2005)
Vielleicht kann mir jemand helfen.
Danke im voraus
Technikus
Delphi-Quellcode:
type
Tleistung = record
nr:byte;
Spannung, Strom, Leistung: double;
end;
type TDatei= file of TLeistung;
{Fehlermeldung: E1025 Sprach-Feature wird nicht unterstützt: 'typisierte oder untypisierte Datei'}
procedure TForm1.Button1_SpeichernClick(Sender: TObject);
var Messwert: TLeistung;
i, anzahl: integer;
Datei: TDatei;
begin
anzahl:=StrToInt(Edit3_Eingabe_anzahl.Text);
AssignFile(Datei,'solarz.dat');
Rewrite(Datei);
for i:= 1 to anzahl do
with Messwert do
begin
nr:= i;
Spannung:= StrToFloat(StringGrid1.Cells[1,i]);
Strom:= StrToFloat (StringGrid1.Cells [2,i]);
Leistung:=StrToFloat (StringGrid1.Cells [3,i]);
Write (Datei,Messwert);
end;
CloseFile (Datei);
end;