스트링그리드의 3번째 칼럼부터 우측정렬을 하고 싶을경우의 예제입니다.
procedure TSelling.StringGrid1DrawCell(Sender: TObject; Col, Row: Integer;
  Rect: TRect; State: TGridDrawState);
var oldalign : word;
begin
if Col > 2 then begin
  oldalign:=settextalign(StringGrid1.canvas.handle,ta_right);
  StringGrid1.canvas.textrect(rect,rect.right-2,rect.top+2,StringGrid1.cells[col,row]);
  settextalign(StringGrid1.canvas.handle,oldalign);
end;

end;