Вниз
Скачать: CL | DM;

Выход из 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]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c
2-1139995609
ZbarKiy
2006-02-15 12:26
2006.03.05
Не понятная надпись caption в TMenuItem


15-1139656603
Steep
2006-02-11 14:16
2006.03.05
Компоненты


15-1139569012
iZEN
2006-02-10 13:56
2006.03.05
Виртуальный принтер в TIFF/JPEG


2-1140182876
Newbee
2006-02-17 16:27
2006.03.05
Подскажите, почему не работает ?


2-1139078593
Человек
2006-02-04 21:43
2006.03.05
Сайт без браузера




   Наверх