秋·风

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::
       lazarus在linux能显示多列的combobox控件暂时只发现ehlib的DBLookupComboboxEh控件满足要求,但使用时发现DBLookupComboboxEh在linux没有右边的按钮,只能鼠标点击DBLookupComboboxEh时才会出现下拉列表。
       为模拟正常的DBLookupComboboxEh,在DBLookupComboboxEh右边放Buuton,在onClick使用以下代码就能实现下拉列表功能(非常感谢网友步惊云提供)
先定义全局变量:Listdisp
DBLookupComboboxEh下拉列表的设置方法:
1、设置ListSource
2、KeyField和ListField
3、DropDownBox里的属性:
     columns设置下拉列表显示几列及每列的宽度和标题
procedure TForm1.Button8Click(Sender: TObject);
begin
  if Listdisp=0 then
  begin
    DBLookupComboboxEh1.DropDown;
    Listdisp:=1;
  end
  else
  begin
    DBLookupComboboxEh1.CloseUp(true);
    Listdisp:=0;
  end;
end;


 

posted on 2022-07-31 16:25  秋·风  阅读(380)  评论(0编辑  收藏  举报