퀀텀 그리드의 Draw header를 이용하여 Header를 그리기

[Original]

  
procedure DrawHeader(ACanvas: TcxCanvas; const ABounds, ATextAreaBounds: TRect;
  ANeighbors: TcxNeighbors; ABorders: TcxBorders; AState: TcxButtonState;
  AAlignmentHorz: TAlignment; AAlignmentVert: TcxAlignmentVert; AMultiLine, AShowEndEllipsis: Boolean;
  const AText: string; AFont: TFont; ATextColor, ABkColor: TColor;
  AOnDrawBackground: TcxDrawBackgroundEvent = nil; AIsLast: Boolean = False;
  AIsGroup: Boolean = False); virtual;

[Code]

  
var
  ACanvas: TcxCanvas;
begin
    ACanvas := TcxCanvas.Create(StrGrdResult2.Canvas);

    RootLookAndFeel.SkinPainter.DrawHeader(ACanvas, DrawRect, DrawTextRect, [], cxBordersAll, cxbsNormal,
      taCenter, vaCenter, False, False, AText, ACanvas.Font,
      RootLookAndFeel.SkinPainter.DefaultHeaderTextColor, RootLookAndFeel.SkinPainter.DefaultHeaderColor);

// Comment 

DrawRect : Draw Header Rect to Apply Control 

DrawTextRect : Draw Header Text Rect to Apply Control 

AText : Header Caption