Главная страница
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.015 c
3-44010
tomkat
2003-03-24 10:22
2003.04.14
FoxPro 5


14-44328
Николай Быков
2003-03-30 18:47
2003.04.14
Кто какие новостные серверы (да и сайты-новости) знает?


1-44135
Valeris
2003-04-03 11:50
2003.04.14
Что за бред! EAbstractError


14-44402
Soft
2003-03-26 18:29
2003.04.14
Взлом эксплорера


6-44307
_MAD_
2003-02-15 23:19
2003.04.14
Дружда cgi и делфи