Mam taki problem może głupi, ale nie mam pomysłu jak to rozwiązać, potrzebuje sprawdzić ile jest miejsc po przecinku. Np. mam 1, 23 to chciałbym by mi zwróciło ze 2 miejsca po przecinku dla 2, 345 ze 3 miejsca itd.…
0
0
var
Pos,ilosc : Integer;
Txt : string;
Txt:='1.23456';
Pos:=Pos(DecimalSeparator,Txt);
ilosc:=Pos - Length(Txt)
//Edit po Juhasie ;-)
0
Oczywiście to jest zły kod, bo należy się posłużyć DecimalSeparator, a nie kropką, czy przecinkiem na sztywno.
0
OK dzieki za pomoc :) udalo się