delphi – 具有csOwnerDrawFixed样式的Combobox如何表现得像csDr
发布时间:2020-12-15 04:20:41 所属栏目:大数据 来源:网络整理
导读:我正在使用一个 TComboBox组件,其style属性设置为csOwnerDrawFixed,我实现了OnDrawItem并且一切正常,现在我想要哪个组合框表现得像csDropDown样式(csOwnerDrawFixed样式的行为类似于csDropDownList样式),我的意思是内部编辑.这可能吗? 解决方法 Delphi的TCo
我正在使用一个
TComboBox组件,其style属性设置为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. (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |