Delphi-Quellcode:
For i:=1 to 20 do
ListBox1.Items.Add(inttostr(i) + '² = ' + inttostr(i*i));
Statt dem = könnte man auch einen Tab (#9) verwenden, dann siehts ein bisschen besser aus.
Aber eine TListView wäre tatsächlich besser geeignet. Beispiel:
Delphi-Quellcode:
var
Item: TListItem;
begin
for i := 0 to 20 do
begin
Item := ListView1.Items.Add;
Item.Caption = 'Erste Spalte';
Item.SubItems.Add('Zweite Spalte');
end;
end;
Zu vor müssen im Objekt-Inspektor oder im Code 2 Spalten erstellt werden und der Style auf vsReport umgestellt werden.