关于Combo控件，加分

Question

不用找其他的了，
D6就有这种控件，呵呵
如果非要自己做的话，用OwnerDraw吧？：）

Answer 1

1、将ComboBox的Style属性设为csOwnerDrawFixed
2、然后在ComboBox的OnDrawItem事件中如下写：procedure TmForm.ComboBox1DrawItem(Control: TWinControl;
  Index: Integer; Rect: TRect; State: TOwnerDrawState);
var bm : TBitMap;
begin
  bm := TBitMap.Create;
  bm.LoadFromFile('c:\aaa.bmp');  ComboBox1.Canvas.FillRect(Rect);
  ComboBox1.Canvas.Draw(Rect.Left,Rect.Top, bm);  bm.Free;
end;

Answer 2

Delphi 6 中自带的 TComboboxEx 就行