TListView aber nicht über ViewStyle=vsIcon

[Luckie]

Ach ja, das steht übrigens in der Hilfe als Beispiel. Ich habe es mal schnell aus meiner englischen Hilfe kopiert:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
  I: Integer;
  ListItem: TListItem;
begin
  // Create a ListView item for each image in the ImageList
  with ListView1 do
  begin
    SmallImages := ImageList1;
    LargeImages := ImageList1;
    for I := 0 to ImageList1.Count - 1 do
    begin
      ListItem := Items.Add;
      Listitem.Caption := 'Image' + IntToStr(I);
      ListItem.ImageIndex := I;
    end;

Ich hoffe, das ist verständlich, trotz dass es aus der englischen Hilfe ist.