我使用的是一个TComboBox组件,其样式属性设置为csOwnerDrawFixed,我实现了OnDrawItem并且一切都很好,现在我想要哪个组合框在具有csDropDown样式时的行为方式(使用csOwnerDrawFixed样式的行为方式与csDropDownList样式类似),我的意思是使用内部编辑器。这可能吗?
Delphi的TComboBox包装器不支持所有者绘制可编辑样式,但底层的Windows控件支持,并且很容易启用。
创建一个新的子类,如下所示:
TComboBox = class(StdCtrls.TComboBox)
public
procedure CreateParams(var Params: TCreateParams); override;
end;
procedure TComboBox.CreateParams(var Params: TCreateParams);
begin
inherited;
if Assigned(OnDrawItem) then
Params.Style := Params.Style or CBS_OWNERDRAWFIXED
end;
将Style
设置为csDropDown
,然后像您已经做的那样分配OnDrawItem
。
所有OwnerDraw样式都不支持在TComboBox
中显示编辑框。您将不得不使用单独的TEdit
。