Zaokrąglić liczbę

0

Małe pytanko:
Mam zamienić string na integer tak aby inteeger był zaokrągloną liczbą całkowitą.
Rozjaśnię:
Mamy edit1 i Progressbar. Teraz tak, w edit wpisujemy jakąś liczbę np. 12,22 i teraz trzeba to zamienić na 22 i wyświetlić na progressbar.
Proste tylko ma się to zmieścić w jednej lini bez zmiennych. Zrobiłem więc coś takiego:
progressbar1.position:=strtoint(edit1.text);
tu gdzieś trzeba wstawić trunc tylko tak aby wszystko mieściło się w 1 linii bez deklarowania dodatkowych zmiennych.
A może to jest nie realne? Nie wiem . Jeśli ktoś ma jakiś pomysł to proszę.

Pozdrawiam

0

To jak najbardziej jest możliwe. Trzebaby to zrobić tak:
progressbar1.position:=trunc(strtofloat(edit1.text));
No i w podanym przez Ciebie przykłądzie to da 12, nie 22 :]
//Dopisane:
Można jeszcze inną metodą (najpierw "zaokrąglić", a potem zamienić :]). Wyglądałoby to tak:
progressbar1.position:=strtoint(copy(edit1.text, 1, pos(',', edit1.text)-1));

0

Wielkie dzięki! [browar]

1 użytkowników online, w tym zalogowanych: 0, gości: 1