THeaderPaintInfo

type THeaderPaintInfo = record

  TargetCanvas: TCanvas;

  Column: TVirtualTreeColumn;

  PaintRectangle: TRect;

  TextRectangle: TRect;

  IsHoverIndex: Boolean;

  IsDownIndex: Boolean;

  IsEnabled: Boolean;

  ShowHeaderGlyph: Boolean;

  ShowSortGlyph: Boolean;

  ShowRightBorder: Boolean;

  DropMark: TVTDropMarkMode;

  GlyphPos: TPoint;

  SortGlyphPos: TPoint;

end;