加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

Delphi TListview OwnerDraw SubItems – 更改默认字体(在画布上

发布时间:2020-12-15 09:25:24 所属栏目:大数据 来源:网络整理
导读:如果您使用带有TListView的ownerdraw,则默认情况下子项都是BOLD字体样式,即使listview font.style设置为[],对于自定义绘制后的所有子项也是如此. 我找到的解决方法是强制在CustomDrawSubItem事件中设置样式: ListView2.Canvas.Font.Style := [fsItalic];Lis
如果您使用带有TListView的ownerdraw,则默认情况下子项都是BOLD字体样式,即使listview font.style设置为[],对于自定义绘制后的所有子项也是如此.

我找到的解决方法是强制在CustomDrawSubItem事件中设置样式:

ListView2.Canvas.Font.Style := [fsItalic];
ListView2.Canvas.Font.Style := [];

(除非将默认样式设置为[]之外的其他内容,否则使用[]的简单调用将无效,因为SetStyle调用不认为样式已更改)

然而,这是一个丑陋的修复,涉及额外的处理时间.有更好的解决方案吗?

演示项目:http://www.mediafire.com/?v8bsdpvpfqy47vn

解决方法

我没有遇到你描述的确切情况,但我遇到了类似的问题.当我使用所有者绘制的TListView与OnAdvancedCustomDrawSubItem事件分配来基于每个子项更改Canvas.Font时,我发现在我为一个子项更改了Sender.Canvas.Font之后,后续的子项被错误地绘制即使我为他们更改Sender.Canvas.Font设置.我的解决方法是在我的OnAdvancedCustomDrawSubItem事件处理程序的末尾手动调用Sender.Canvas.Font.OnChange事件处理程序.这表示TListView向Windows报告CDRF_NEWFONT,然后一切都被正确绘制.就好像在TListView被所有者绘制时没有正确连接Sender.Canvas.Font.OnChange事件,因此它不会检测字体更改,因此不会正确地向Windows报告.

(编辑:李大同)

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

    推荐文章
      热点阅读