当Edit1的状态为Disable时,如何改变它的字体颜色

kxn 2008-04-19 11:58:01
当Edit1的状态为Disable时,如何改变它的字体颜色
...全文
165 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
pengxuan 2008-04-23
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 Didy 的回复:]
常用的办法就是重写TEdit的Paint了,因为TEdit的Paint里使用了Windows的Disable时使用的字体颜色楼上的办法不会有效果的。
[/Quote]
同意,试试重写Paint
blazingfire 2008-04-20
  • 打赏
  • 举报
回复
改成ReadOnly := True,再修改字体颜色
创业码农 2008-04-20
  • 打赏
  • 举报
回复
常用的办法就是重写TEdit的Paint了,因为TEdit的Paint里使用了Windows的Disable时使用的字体颜色楼上的办法不会有效果的。
zhao_yong 2008-04-20
  • 打赏
  • 举报
回复
[Quote=引用 3 楼 blazingfire 的回复:]
改成ReadOnly := True,再修改字体颜色
[/Quote]

同意!
xiaocha 2008-04-20
  • 打赏
  • 举报
回复
在Disable的代码后进行设置,如下:
Edit1.Disable;
Edit1.Font.Color := clRed;
genispan 2008-04-20
  • 打赏
  • 举报
回复
[Quote=引用 3 楼 blazingfire 的回复:]
改成ReadOnly := True,再修改字体颜色
[/Quote]
ding!

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧