关于StringGrid，急，急，急！！！！！！

应如何使StringGrid底颜色始终为黑色呢。我的StringGrid总是有一个单元格中的颜色为兰色。怎么设置都不行，最号有源代码。谢谢 问题点数：20、回复次数：2Top

1 楼huyang38915（胡杨）回复于 2003-12-01 21:39:28 得分 10

OnDrawCell:  
    //if   条件  
    begin  
          StringGrid1.Canvas.Brush.Color   :=   clblack;  
          StringGrid1.Canvas.FillRect(Rect);  
          with   StringGrid1.Canvas   do  
              Textout(rect.left+3,rect.top+2,StringGrid1.Cells[ACol,ARow]);  
    end;  
  Top

2 楼xiaoqiang123（xiaoqiang）回复于 2003-12-01 21:46:33 得分 10

OnDrawCell:  
   
  StringGrid1.Canvas.Brush.Color   :=   clblack;  
          StringGrid1.Canvas.FillRect(Rect);  
          with   StringGrid1.Canvas   do  
              Textout(rect.left+3,rect.top+2,StringGrid1.Cells[ACol,ARow]);  
  Top

相关问题

• top
• stringgrid1
• stringgrid
• canvas
• rect
• ondrawcell
• clblack
• arow
• acol
• fillrect

• 帖主：cqlumm
• huyang38915
• xiaoqiang123

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载