Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.05;
Скачать: 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 вся ветка

Текущий архив: 2006.03.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.056 c
4-1134515286
Vitan
2005-12-14 02:08
2006.03.05
Запрет запуска дочерных процессов.


4-1134539513
DmiSb
2005-12-14 08:51
2006.03.05
Как узнать расширение файла, если расширение было изменено ?


15-1139565712
Koala
2006-02-10 13:01
2006.03.05
Планшет? какой выбрать....?


2-1140275296
VAZMan
2006-02-18 18:08
2006.03.05
Регистрация пользователя


6-1132797718
Bomm
2005-11-24 05:01
2006.03.05
Как узнать текущию рабочию группу?