如何让StringGrid中某列的所有记录右对齐？

Question

StringGrid属性里没有呀，DBGrid里面才有的吧。

Answer 1

前几天才回复过类似的帖子。看一下例子好了，这是我以前的回复。固定行单元格文字水平、垂直居中 
 
在StringGrid的OnDrawCell事件中 
var 
    CellString  :  string; 
begin 
    if  ARow  <  StringGrid.FixedRows  then 
    begin 
        CellString  :=  StringGrid.Cells[ACol,  ARow]; 
        StringGrid.Canvas.TextRect(rect,  rect.left  +  (rect.right  -  rect.left  -  StringGrid.Canvas.TextWidth(CellString))  div  2,  rect.top  +  (rect.bottom  -  rect.top  -  StringGrid.Canvas.TextHeight(CellString))  div  2,  CellString) 
    end; 
end; StringGrid的OnDrawCell事件发生在系统重绘单元格之后，需要改变StringGrid的外观，只要在这个事件里写相应的代码就可以了。 
 
参数ACol和ARow表示当前正在绘制的行和列，而Rect参数则是此单元格的区域。通过State参数可以了解此单元格当前的状态。你可以参照这个方法写出左对齐和右对齐的代码来。