Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.14;
Скачать: CL | DM;

Вниз

while not eof(1) do....   Найти похожие ветки 

 
denis24   (2003-04-02 19:07) [0]

Как перейти из даного шага на следующий без выхода из всего цикла?
while not eof(1) do
begin
считываем строку,,,

if lenght(stroka)>10 then ?????
end


 
Palladin ©   (2003-04-02 19:11) [1]

перефразируй


 
Zz_   (2003-04-02 19:14) [2]

Тебе continue что-ли нужен ?


 
vgb ©   (2003-04-02 19:16) [3]

continue


 
denis24   (2003-04-02 19:19) [4]

точно
а вот как это на вб?


 
panov ©   (2003-04-02 19:36) [5]

>denis24 (02.04.03 19:19)
точно
а вот как это на вб?


Точно так же...


 
denis24   (2003-04-02 19:42) [6]

нифига,,,,ругается


 
panov ©   (2003-04-02 19:50) [7]

Специально проверил - все в порядке.

var
s: String;
begin
s := "12345678901234567890";
while True do
begin
if Length(s)>10 then
begin
Delete(s,1,1);
Continue;
end else break;
end;
ShowMessage("ok");
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
1-44089
Serj
2003-04-02 16:34
2003.04.14
Передача обраблтки сообщения от компонента


1-44159
Zarba
2003-04-03 16:45
2003.04.14
Копирование файлов Stealths ом


3-44025
Nikola62
2003-03-25 13:00
2003.04.14
Paradox 4.5 for Dos. Как отобразить данные в Гриде?


1-44232
saty
2003-04-01 20:05
2003.04.14
количество строк


14-44409
kostya2000
2003-03-26 15:44
2003.04.14
Постройте алгоритм: