Wie Spaltenbreite bei virtuellem ListView einstellen?

[omata]

Ich verstehe es zwar nicht wirklich, aber lass mal die +1 weg...

Delphi-Quellcode:

procedure TForm1.ListView1Data(Sender: TObject; Item: TListItem);
begin
  Item.Caption := DupeString('Test ', item.index mod divisor);
end;

...dann geht es.