var
i : word;
begin
for i := 0 to ListBox.Count-1 do
begin
Memo.Lines.Add(ListBox.Items);
end;
end;
Старая приколюха
Несколько лет назад обнаружил такую фишку:
Код:
При пустом листбоксе (т.е. i:=0 to -1) -> ошибка,
хотя теоретически цикл выполнятся не должен.
Лечится заменой word-a на integer :)
А искал багу долго...
P.S. Может кто-нибудь еще какие-нибудь Делфийские фишки знает?