Zitat von
Klaus01:
Delphi-Quellcode:
function StrToSingle(St : String) : Single;
var
Code : Integer;
begin
Val(St,Result,Code);
end;
macht aus '1,2345678' eine 1
und aus '1.2345678' eine 1,2345677614212
edit: Wo ist nur Hagen (oder einer der andern Mathe/Zahlenprofi's) wenn man ihn mal brauch!?
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.