Выход из loop a? (Или просто округление).

← →
The Sound © (2006-02-17 15:18) [0]

Воть, набросал тут код:

i64:=i/2;
i64s:=floattostr(i64);
for j:=1 to length(i64s) do
begin
if i64s[j] = "," then [?];
if i64s[j]<>"," then i64s2:=i64s2+i64s[j];
end;

Как дописать, что если i64s[j] = запятой, то выход из loop"a? Спасибо.

← →
McSimm © (2006-02-17 15:22) [1]

Trim()
FormatFloat()
Format()

F1

← →
McSimm © (2006-02-17 15:23) [2]

И еще Pos() не лишним будет посмотреть

← →
Плохиш © (2006-02-17 15:55) [3]

break

← →
Саунд (2006-02-17 18:10) [4]

Спасибо, разобрался %)

Выход из loop a? (Или просто округление). Найти похожие ветки