FileListBox OnComplete事件

Question

我需要遍历FileListBox中的文件并找到最长的文件名来设置一些列宽。

我目前正在使用

shFiles.Directory:=shFolders.Directory;
aWid:=0;
for i:=0 to shFiles.Items.Count-1 do
  if Length(shFiles.Items[i]) > aWid then
    aWid:=Length(shFiles.Items[i]);

这就是我需要的，但是当文件数量很大并且aWid进程在整个FileListBox已满之前开始时，我遇到了问题。

我需要为＆＃34; OnComplete＆＃34;或者告诉我FileListBox已经完成将所有文件加载到ListBox中，以便我可以运行aWid for-next。

我该怎么做呢？谢谢。

Answer 1

在OnChange调用ReadFileNames填写列表后，您要查找的事件为Change。 （单位FileCtrl）