Глюк какой-то? Или нет. Проблема с Memo1.Lines.Delete

← →
Артём К (2003-02-13 13:51) [0]

Привет мастера!
Почему происходит удаление только чётных строк?

procedure TForm1.Button1Click(Sender: TObject);
var
i:Integer;
begin
for i:=0 to 9 do
Memo1.Lines.Delete(i);
end;

← →
[lamer]Barmaglot © (2003-02-13 13:54) [1]

Потому что после удаления строки №0 строка 1 становится строкой №0, а ты удаляешь следующую...

← →
Slava © (2003-02-13 13:55) [2]

Потому что все время через один перескакиваешь :)

← →
BLooDMaN © (2003-02-13 13:57) [3]

:)) У меня тоже подобна проблема была вот ответ :
for i:=9 downto 0 do
Memo1.Lines.Delete(i);
end;

← →
Александр С. © (2003-02-13 14:02) [4]

for i:=0 to 9 do
Memo1.Lines.Delete( 0);
end;

← →
Palladin © (2003-02-13 14:05) [5]

> Артём К (13.02.03 13:51)

:) мда
надо было хоть попытаться смоделировать в голове ситуацию...

← →
Артём К (2003-02-13 14:08) [6]

Всем большое ЧЕЛОВЕЧЕСКОЕ спасибо!!!

Стыдно стало?

Глюк какой-то? Или нет. Проблема с Memo1.Lines.Delete Найти похожие ветки