Auslesen von Float Werten

[himitsu]

Du erstellst dir entweder eine Funktion, welche es als String ausließt und dann umwandelt.
(Str und Val nutzen immer den Punkt als Dezimalzeichen)

Oder (aber dazu würde ich nicht raten) du stellst wärend des Auslesens den DecimalSeparator kurz um.
[edit] wurde schon gesagt [/edit]

Oder, man erstellt sich 'nen neues Property für TField, welches den ersten Vorschlag nutzt
(geht aber nur in neueren Delphi-Versionen)

Delphi-Quellcode:

type
  TFieldHelper = class Helper for TField
  private
    function GetAsFloatEx: Double;
  public
    property AsFloatEx: Double read GetAsFloatEx;
  end;

function TFieldHelper.GetAsFloatEx: Double;
var e: Integer;
begin
  Val(AsString, Result, e);
  //if e > 0 then Exception_oder_so;
end;