Delphi XE2 之 FireMonkey 入門(42) – 控制項基礎: TComboBox、TComboEdit

TListBox 有兩個兄弟 TComboListBox、TComboEditListBox;

TComboBox、TComboEdit 雖不是不是從它們繼承, 但分別包含了它們, 所以使用起來都有點像 TListBox.

TComboBox 更像 TListBox, 比 TComboEdit 多出了 Selected 等成員;
TComboEdit 是從 TCustomEdit 繼承, 和 TEdit 是兄弟, 比 TComboBox 多出了 Text 等成員.

它們的公用常用屬性:

DropDownCount //下拉式清單行的數ItemHeight    //ItemIndex     //Items         //Count         //

測試:

procedure TForm1.FormCreate(Sender: TObject);var  i: Integer;begin  { ComboBox1 }  for i := 0 to 9 do    ComboBox1.Items.Add(Format('Item_%d', [i]));  with ComboBox1 do  begin    ItemIndex := 0;    DropDownCount := 5;    ListBox.UseSmallScrollBars := True;    TListBox(ListBox).AlternatingRowBackground := True; //這個兄弟轉換用得有點懸, 只是為了讓 AlternatingRowBackground 屬性暴露出來  end;  { ComboEdit1 }  ComboEdit1.Items.Assign(ComboBox1.Items);  with ComboEdit1 do  begin    ItemIndex := 0;    DropDownCount := 5;    ListBox.UseSmallScrollBars := True;    TListBox(ListBox).AlternatingRowBackground := True;  end;//  ComboEdit1.Text := 'Text';end;