秋·风

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::
  278 随笔 :: 0 文章 :: 308 评论 :: 20万 阅读
< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5
       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   秋·风  阅读(419)  评论(0编辑  收藏  举报
相关博文:
阅读排行:
· TypeScript + Deepseek 打造卜卦网站:技术与玄学的结合
· Manus的开源复刻OpenManus初探
· AI 智能体引爆开源社区「GitHub 热点速览」
· 从HTTP原因短语缺失研究HTTP/2和HTTP/3的设计差异
· 三行代码完成国际化适配,妙~啊~
点击右上角即可分享
微信分享提示