您的位置: 首页  >  IT文章  >  怎么设置StringGrid的各个单元格之间的那个边框的颜色

怎么设置StringGrid的各个单元格之间的那个边框的颜色

分类: IT文章 • 2024-01-31 23:35:42
如何设置StringGrid的各个单元格之间的那个边框的颜色
如题

------解决方案--------------------
在drawcell事件里控制
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; 
Rect: TRect; State: TGridDrawState); 
begin 
TStringGrid(Sender).Canvas.Pen.Color := clRed; 
TStringGrid(Sender).Canvas.Brush.Style := bsClear; 
TStringGrid(Sender).Canvas.Rectangle(Rect); 
end; 


参考
http://topic.csdn.net/u/20070420/16/583ef8af-538f-4a2a-8670-5e7f882b574e.html

相关推荐