''10.500,00' is not a valid floating point value

[marabu]

Hallo,

das Hauptproblem scheint mir der Tausenderpunkt im Feld EdAnzahl zu sein - der muss weg:

Delphi-Quellcode:

var
  e: Extended;
begin
  e := StrToFloat(StringReplace('10.000,50', '.', '', [rfReplaceAll]));
  ShowMessage(FloatToStr(e));
end;

Sollte EdAnzahl eine Feldkomponente sein, dann hilft schon der typgerechte Zugriff mittels EdAnzahl.AsFloat um das Problem zu vermeiden.

Grüße vom marabu