请问如何控制stringgrid中每行或每列或每格的颜色和字体?谢谢! 请问如何控制stringgrid中每行或每列或每格的颜色和字体?谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);begin with StringGrid1.Canvas do begin Brush.Color := clRed; FillRect(Rect); TextOut(Rect.Left+2, Rect.Top+3, StringGrid1.Cells[ACol, ARow]); end;end; double数组如何求乘积? 经管没有高手露面,可我还是继续提问题,关于DLL的 如何把一篇Word 文档保存到数据库里? dbgrid竖着排的两个小问题 通过ADO的连接ORACLE速度问题! 怎么install Formula Activex 6.0 to delphi 关于SHAPE的问题?? 怎样得到Listview的ListItem的高度,和宽度? 怎样用Delphi开发Windows系统与linux进程间通信? 如何让interbase6兼容使用interbase5的数据库? 紧急求助(调用winrar的dll或ocx的问题?)!!!!!!!] 有事没事看看!!
Rect: TRect; State: TGridDrawState);
begin
with StringGrid1.Canvas do begin
Brush.Color := clRed;
FillRect(Rect);
TextOut(Rect.Left+2, Rect.Top+3, StringGrid1.Cells[ACol, ARow]);
end;
end;