안냐셔염.,..^_^
전번에도 올렸는데... 초보다보니.. 머르는게 많아서리..
고수님덜의 도움이 필요해서 올립니다.

procedure TPUMO0001Form.AdvGridDrawCell(Sender: TObject; ACol,
  ARow: Integer; Rect: TRect; State: TGridDrawState);
var
    Save_OldAlign : word;
    TW            : integer;
begin
    With AdvGrid.Canvas Do Begin
        If (ARow = 0) Then Begin  //타이틀 중앙정렬
            FillRect(Rect);
            TW := TextWidth(AdvGrid.Cells[ACol, ARow]);
            TextOut((Rect.Left + Rect.Right - TW) div 2, Rect.Top+5, AdvGrid.Cells[ACol,ARow])
        End
        Else Begin
            If (Trim(AdvGrid.Cells[0,ARow]) = '지역별계') Then Begin   //지역별계 라인색깔변경
                Font.Style := Font.Style + [fsBold];
                Font.Color := clBlack;
                Brush.Color := $00E1FFFF;
               // TextRect(Rect, Rect.Left+2, Rect.Top+5, AdvGrid.Cells[ACol, ARow]);
            End;
            If (ACol > 1) AND (ACol < 19) Then Begin    //숫자 오른쪽정렬

                Save_OldAlign := SetTextAlign(Handle, TA_RIGHT);
                TextRect(Rect, Rect.Right-2, Rect.Top+2, AdvGrid.Cells[ACol,ARow]);
                SetTextAlign(Handle, Save_OldAlign);
            End;

숫자 오른쪽정렬이라고 한부분이 숫자뿐만아니라 데이타까지 오른쪽 정렬이
되어버립니다...
여기를 어케해야되는건지..
숫자는 오른쪽 정렬이고요..
데이타는 왼쪽정렬을 하려고 하거든요...
알려주셔염..^_^
어널하루두 존하루 존시간 보내시구요^__^
즐코딩하세요^^