起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 131|回复: 4

【结贴】有关TOrgComboBox灰显的问题**

[复制链接]
发表于 2008-1-3 10:03:38 | 显示全部楼层 |阅读模式
将TOrgComboBox.Enabled 置为False,其灰色效果很不理想。为了给用户带来方便的操作,希望灰显(不可用)的效果更明显。
回复

使用道具 举报

发表于 2008-1-3 13:34:36 | 显示全部楼层
procedure TMainForm.Button2Click(Sender: TObject);
begin
  if  OrgComboBox1.Enabled then
  begin
    OrgComboBox1.Enabled:=false;
    OrgComboBox1.Color:=Graphics.clBtnFace;
  end
  else begin
    OrgComboBox1.Enabled:=true;
    OrgComboBox1.Color:=Graphics.clWindow;
  end;

end;
回复 支持 反对

使用道具 举报

发表于 2008-1-3 13:36:43 | 显示全部楼层
设置 TOrgComboBox 的 Color 属性就可以了
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-1-3 14:12:18 | 显示全部楼层

基本满意了

谢谢楼上两位的关注!
一朋友建议我修改字体颜色,我试了试,还算满意。代码如下:
OrgComboBox1.Font.Color := Graphics.clGrayText;  // clGrayText:灰色文本
回复 支持 反对

使用道具 举报

发表于 2008-1-3 14:23:03 | 显示全部楼层
ok,结
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-5 05:58 , Processed in 0.039415 second(s), 16 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表