在Listview中如何对item的绘画???

huangjun12 2004-04-30 09:00:12
现在碰到个问题,我知道在Listview中如何绘画,但是当我从数据库中返回记录往Listview中写数据时,比如当一条Listitem.caption中的值为负数时将该行item的颜色画为黄色,不满足条件的就不画,这个代码如何实现
...全文
71 2 打赏 收藏 举报
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
江宁侯哥 2004-04-30
procedure Tform1.ListView1CustomDrawItem(
Sender: TCustomListView; Item: TListItem; State: TCustomDrawState;
var DefaultDraw: Boolean);
begin
if strtofloat(Item.caption)<0 then
Sender.Canvas.font.Color :=clYellow;
end;
  • 打赏
  • 举报
回复
yueshujiang 2004-04-30
www.delphiboy.com
  • 打赏
  • 举报
回复
相关推荐
发帖
Delphi
加入

5074

社区成员

Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
申请成为版主
帖子事件
创建了帖子
2004-04-30 09:00
社区公告
暂无公告