G.ude
Ich möchte 2 Werte miteinander verrechnen, es scheitert jedoch an einem EConvertError!
DIe Fehlermeldung lautet: 26.51551922 ist kein gültiger Gleitkommawert.
Hier der Quelltext:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var wert1, wert2: string;
var wert11, wert12, wert3: real;
begin
wert1 := Copy(Stringgrid1.cells[0,1], 7, 11);
wert2 := Copy(Stringgrid1.cells[0,2], 7, 11);
wert1 := '+' + wert1;
wert2 := '+' + wert2;
wert11 := StrToFloat(wert1);
wert12 := StrToFloat(wert2);
wert3 := wert12 - wert11;
label1.caption := FloatToStr(wert3);
An was liegts?
ThX