Listbox

[fLaSh11]

for-Schleifen-Lösung:

Delphi-Quellcode:

for i := 1 to 10 do
  ListBox1.Items.Add(IntToStr(i * 11));

until-Lösung:

Delphi-Quellcode:

i := 0;
repeat
  i := i + 11;
  ListBox1.Items.Add(IntToStr(i));
until (i = 110);