用StringGridEx试试,见:
http://www.ocloud.com/product/softview.php?SoftID=13
http://www.ocloud.com/product/softview.php?SoftID=13
解决方案 »
- 仓库管理软件源码,本人愿意买,谢谢,那位好心人,能和我联系
- 当他遇上她时
- 进入DELPHI程序界,有多少前途?在线讨论
- 如何判断一个子窗口获得焦点??急用?
- 请教有关ADO查询结果不正确的问题?
- 如何启动VisiBroker中的名字服务nameserv?(corba)
- 各位大虾小虾,我是p-mail作者,这个软件说实话做得不好,但真的需要您(尤其是已经下载的)真诚的建议!!!
- ◆关于delphi中vcl消息机制心得及其疑问◆
- 数据库日期字段如何用datatimepicer选定日期存入数据库
- 关于局域网通信的问题
- 个位大哥,那有RQDesign这组控件ForD5/D6
- 如何用Delphi制作类似Windows开始菜单旁边的蓝条
procedure Tfrmclerktable.StringGrid1DrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
if (acol = 6) then
begin
StringGrid1.Canvas.Brush.Color := clinfobk;
StringGrid1.Canvas.pen.Color := StringGrid1.Font.Color ;
StringGrid1.canvas.fillRect(rect);
StringGrid1.Canvas.textout(rect.left+1,rect.Top ,StringGrid1.cells[acol,arow]);
end;
end;