delphi – ComboBox中的名称值对

发布时间：2020-12-15 10:09:56 所属栏目：大数据来源：网络整理

导读：我相信这一定是一个常见的问题,但我似乎找不到一个简单的解决方案我想使用名称值对的组合框控件作为项目. ComboBox将TStrings作为其项目,这样就可以了. 不幸的是,组合框上的绘图方法会绘制Item [i],以便在框中获取Name = Value. 我希望该值被隐藏,所以我可

我相信这一定是一个常见的问题,但我似乎找不到一个简单的解决方案

我想使用名称值对的组合框控件作为项目. ComboBox将TStrings作为其项目,这样就可以了.

不幸的是,组合框上的绘图方法会绘制Item [i],以便在框中获取Name = Value.

我希望该值被隐藏,所以我可以使用代码中的值,但用户看到该名称.

有任何想法吗？

解决方法

将样式设置为csOwnerDrawFixed并写入

procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
  Rect: TRect; State: TOwnerDrawState);
begin
  ComboBox1.Canvas.TextRect(Rect,Rect.Left,Rect.Top,ComboBox1.Items.Names[Index]);
end;

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!