自绘背景首先填满listiew的区域,显示正确,但是数据多时,因为要滚动,背景图像就只显示原来的一部分和新画的一部分。
procedure Tfrmexe.appbCustomDraw(Sender: TCustomListView;
const ARect: TRect; var DefaultDraw: Boolean);
begin
sender.Canvas.Brush.Bitmap:=bmpbk;
Sender.Canvas.FillRect(ARect);
end;
开始是这样滚动一下后是这样
http://b152.photo.store.qq.com/psb?/V105CZTm2RQyRj/vaSg.ecx5NF7XRX0GSvTJBkYwhYDvqkP8ztBKMGNjG8!/b/YYz1nVqhkgAAYp2bpVqZggAA
procedure Tfrmexe.appbCustomDraw(Sender: TCustomListView;
const ARect: TRect; var DefaultDraw: Boolean);
begin
sender.Canvas.Brush.Bitmap:=bmpbk;
Sender.Canvas.FillRect(ARect);
end;
开始是这样滚动一下后是这样
http://b152.photo.store.qq.com/psb?/V105CZTm2RQyRj/vaSg.ecx5NF7XRX0GSvTJBkYwhYDvqkP8ztBKMGNjG8!/b/YYz1nVqhkgAAYp2bpVqZggAA
解决方案 »
- BCB调用DLL出错,求高手解答
- RxRichEdit读取Unicode的问题
- delphi实现 拨号问题
- fastreport的dataset属性为什么是空的?
- 线程中的sleep函数前必须使用application.ProcessMessages;这样才可以在sleep的时候让别的线程工作?
- 散分啦!webbrower和dbgrid的焦点切换问题超难,凡up者均有分得。
- 妹妹考大学 (2) 推荐一个非陕西省的二类本科院校 , 帮忙了不胜感激 !
- 急呀,在线等待.......
- 辛苦了,高手们!怎样让combobox的items值分组连接一表的“类型”字段值。
- 请问需要加什么代码可以让那个DBGRID不显示历史记录,
- DELPHI 模拟鼠标点击问题,使用绝对坐标
- 终于入门了,心情不错,散小分!!!
const ARect: TRect; var DefaultDraw: Boolean);里面写Invalidate会不停刷新,不知道得在哪个事件里写invalidate