怎样给;listview按数字大小排序?
设置ListView的
SortType属性为stBoth。然后在OnCompare事件中输入比较大小的代码。
procedure TForm1.ListView1Compare(Sender: TObject; Item1, Item2:
TListItem;
Data: Integer; var Compare: Integer);
var m, n :integer;
begin
m := StrToInt(Item1.Caption);
n := StrToInt(Item2.Caption);
Compare := m - n;
end;
但listciew就是没有排序呢?
SortType属性为stBoth。然后在OnCompare事件中输入比较大小的代码。
procedure TForm1.ListView1Compare(Sender: TObject; Item1, Item2:
TListItem;
Data: Integer; var Compare: Integer);
var m, n :integer;
begin
m := StrToInt(Item1.Caption);
n := StrToInt(Item2.Caption);
Compare := m - n;
end;
但listciew就是没有排序呢?
...全文
相关推荐
2021年小红书品牌调研报告(48页).pdf
2021年小红书品牌调研报告(48页).pdf
20210709-头豹研究院-2021年小红书品牌调研报告.pdf
20210709-头豹研究院-2021年小红书品牌调研报告.pdf
2021年小红书品牌调研报告.pdf
2021年小红书品牌调研报告.pdf
20210630-头豹研究院-社交电商行业:2021年小红书品牌调研报告.pdf
20210630-头豹研究院-社交电商行业:2021年小红书品牌调研报告.pdf
20210531-克劳锐-2020~2021广告主KOL营销市场盘点及趋势预测.pdf
20210531-克劳锐-2020~2021广告主KOL营销市场盘点及趋势预测.pdf


