作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我找到了一个很好的组件来实现 ComboBox 的标题<->值列表:
Is there a ComboBox that has Items like a TcxRadioGroup?
唯一的问题是:它有一个 Sorted 属性,但这不起作用。
那么,如何对 TcxImageComboBox 的项目进行排序?
最佳答案
快速而肮脏的方法,在大多数情况下应该可以正常工作:
function CompareItems(AFirst: TcxImageComboBoxItem; ASecond: TcxImageComboBoxItem): Integer;
begin
Result := AnsiCompareText(AFirst.Description, ASecond.Description);
end;
procedure SortCxComboBoxItems(AItems: TcxImageComboBoxItems);
var
I : Integer;
J : Integer;
PMin : Integer;
begin
AItems.BeginUpdate;
try
// Selection Sort (http://en.wikipedia.org/wiki/Selection_sort)
for I := 0 to AItems.Count - 1 do
begin
PMin := I;
for J := I + 1 to AItems.Count - 1 do
begin
if CompareItems(AItems[J], AItems[PMin]) < 0 then begin
PMin := J;
end;
end;
if PMin <> I then
begin
AItems[PMin].Index := I;
end;
end;
finally
AItems.EndUpdate;
end;
end;
关于delphi - 如何按描述对 TcxImageComboBox 的项目进行排序?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8185796/
我找到了一个很好的组件来实现 ComboBox 的标题值列表: Is there a ComboBox that has Items like a TcxRadioGroup? 唯一的问题是:它有一个
我是一名优秀的程序员,十分优秀!