Главная страница
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.074 c
15-1139561483
@BraIN
2006-02-10 11:51
2006.03.05
Что бы это значило..


11-1120806487
Jumper
2005-07-08 11:08
2006.03.05
Курсор в RichEdit


2-1139741086
ZeFiR
2006-02-12 13:44
2006.03.05
MDI приложение


1-1138713607
AMPR
2006-01-31 16:20
2006.03.05
DLL, динамический выхов процедур с переменных числом параметров.


15-1139161550
Джо
2006-02-05 20:45
2006.03.05
Ищу: Графоманский сайт