如何对组合框内的项目进行排序？

Question

我有一个组合框，我添加了一些数字，如下面的代码

combobox1.Items.BeginUpdate;
try
  combobox1.Sorted := True;
  combobox1.Items.Add('0');
  combobox1.Items.Add('2');
  combobox1.Items.Add('1');
  combobox1.Items.Add('3');
  combobox1.Items.Add('5');
  combobox1.Items.Add('4');
finally
  combobox1.Items.EndUpdate;
end;

我想在combobox内将这些数字排序为0,1,2,3,4,5 ......等等。

我启用了Sorted属性，但项目没有排序。

我怎么可能在combobox？

中对带有数字的项目进行排序

我使用以下代码从TList加载combobox中的项目：

var
  J : integer;
  themes : Tthemes;
begin
  ComboBox1.Items.BeginUpdate;
  try
    ComboBox1.Sorted := True;
    for J := 0 to listitems.Count - 1 do
    begin
      themes := listitems.Items[J];
      ComboBox1.Items.Add(themes.designid);
    end;
  finally
    ComboBox1.Items.EndUpdate;
  end;

  ComboBox1.ItemIndex := 0;

Answer 1

试试这个：

  combobox1.Sorted := False;
  combobox1.Items.Add('0');
  combobox1.Items.Add('2');
  combobox1.Items.Add('1');
  combobox1.Items.Add('3');
  combobox1.Items.Add('5');
  combobox1.Items.Add('4');
  combobox1.Sorted := True;