Скачать: 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 вся ветка

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



Память: 0.46 MB
Время: 0.013 c