Delphi Xe2。带有大量列表项的Listview(Lv1)。 Lv1具有标准比较过程“TForm1.lv1Compare”。通过标准过程lv1.AlphaSort开始排序; 一切正常工作并且已经排序。问题是:如何在需要的情况下立即停止已启动的排序?
例子:
在OnCompare过程中是否有任何停止命令?
例子:
procedure tform1.button1.onclick(..);
begin
lv1.AlphaSort; // start sorting
end;
procedure tform1.button2.onclick(..);
begin
//lv1.StopSort; // stop sorting ???
end;
在OnCompare过程中是否有任何停止命令?