Also ich benutze den o.g. Code
Delphi-Quellcode:
procedure TForm1.Differenz;
var i : integer;
var k: double;
begin
k:=0;
for i:=0 to Memo1.Lines.Count-1 do begin
k := k + (StrToFloat(memo1.Lines[i+1])-(StrToFloat(memo1.Lines[i])));
Memo2.Lines.Insert(i, FloatToStr(k));
end;
end;
Was mich nun wundert ist, dass plötzlich doch eine Fehlermeldung erhalte
Zitat:
Im Projekt Project1.exe ist eine Exeption der Klasse EConvertError aufgetreten. Meldung: '''ist kein gültiger Gleitkommawert'...
Aber.. ich verstehe nicht warum
