Hallo! (Delphi 2005 Prof.)
Da ich mich mit Delphi noch nicht so gut auskenne, bitte ich um Nachsicht. Ich fühle mich langsam schuldig, dass ich euch zur Last falle, vielleicht liegt der Fehler auch weiter oben im Code?
Sollte ich den gesamten Quellcode anhängen, den ich bis jetzt in der
unit habe?
Nochmal zu dem Speicherabschnitt:
In der Hilfe finde ich Script, der mir nichts sagt und ich auch nicht verstehe, also ich auch nicht weiß, was ich ändern sollte.
marabu, was verstehst du unter "Wenn das Schlüsselwort absolute von deinem Compiler (den möchtest du mal in dein
DP-Profil eintragen) nicht gemocht..."
ich habe den Quellcode wiederum wie folgt geändert:
Fehlermeldung nun: in Zeile 7
Delphi-Quellcode:
type TLeistung= record
nr: byte;
Spannung, Strom, Leistung: double;
end;
procedure TForm1.Button1_SpeichernClick(Sender: TObject);
var Messwert: TLeistung;
Buffer: SysUtils.PByteArray;
{E2003 Undefinierter Bezeichner: 'PByteArray'}
i, anzahl: integer;
fs : TFileStream;
begin
anzahl:=StrToInt(Edit3_Eingabe_anzahl.Text);
fs := TFileStream.Create('solarz.dat', fmCreate);
try
for i:= 1 to anzahl do
with Messwert do
begin
Buffer:=@Messwert;
nr:= i;
Spannung:= StrToFloat(StringGrid1.Cells[1,i]);
Strom:= StrToFloat (StringGrid1.Cells [2,i]);
Leistung:=StrToFloat (StringGrid1.Cells [3,i]);
end;
fs.WriteBuffer(Buffer^,Sizeof(Messwert));
finally
fs.Free;
end;
end;
Gruß
Technikus