delphi - TListView - 如何在调整大小时重新排列项目

Question

我有一个显示小缩略图的TListView(ViewStyle:=vsIcon)。在运行时，我将图像分配给项目:

  for i := 0 to Total - 1 DO
   with ListView.Items.Add DO
     begin
      Caption := 'Item ' + IntToStr(i);
      ImageIndex := i;
     end;

启动时，表单不是很宽，缩略图仅显示在 3 列上。不幸的是，如果我调整表单(和 ListView)的大小，列数将保持为 3，并且右侧将有很多空白。

这也行不通:

procedure TForm1.FormCreate(Sender: TObject);
begin
 ListView.IconOptions.AutoArrange := TRUE;
end;

如何重新排列项目以填补空白？
有没有像 AutoArrange 这样的属性？

<小时/>

更新:
我删除了旧控件，并在表单上放置了一个新控件。
现在ListView.IconOptions.AutoArrange 可以工作了。先前的控件中存在某些内容(我所做的一些设置)导致 AutoArrange 无法工作。

Answer 1

有一个属性，例如AutoArrange。它属于IconOptions属性而不是直接到 ListView 。

ListView1.IconOptions.AutoArrange := True;

要一次性排列图标，您可以调用 ListView_Arrange。