Hallo raiguen,
Zitat von
raiguen:
Deine Funktion wird bei der deutschen Schreibweise eines Gleitkommawertes (23,456)immer FALSE zurückgeben
da hast du Recht. Da bei mir D3 nicht installiert ist, habe ich mal D2 angeworfen und noch einen Fehler entdeckt - die calling convention "out" wird wahrscheinlich auch nicht kompiliert. Und weil es mir um den upgrade path geht, schlage ich die Umbenennung deiner Funktion IstGleitkommazahl() vor:
Delphi-Quellcode:
function TryStrToFloat(const S: String; var Value: Extended): Boolean;
begin
Result := TextToFloat(PChar(S), Value, fvExtended);
end;
Danke für deine Aufmerksamkeit.
marabu