| Class TExHeaderControl (unit ExHeaderControl) |
TWinControl
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure LoadSettings(RegKey: String);
procedure ReadArray(RegKey, ColType: String; ColCount: integer;
var IntArray: array of integer);
procedure SaveSettings(RegKey: String);
procedure StoreArray(regKey, colType: String; ColCount: integer;
const IntArray: array of integer);
procedure CreateParams(var Params: TCreateParams);
procedure CreateWnd;
procedure DividerDblClick(Section: TExHeaderSection);
procedure DrawSection(Section: TExHeaderSection; const Rect: TRect;
Pressed: Boolean);
procedure Notification(AComponent: TComponent;
Operation: TOperation);
procedure Resize;
procedure SectionClick(Section: TExHeaderSection);
procedure SectionDblClick(Section: TExHeaderSection);
procedure SectionDragBegin(Section: TExHeaderSection; var AllowOperation: Boolean);
procedure SectionDragEnd(Section: TExHeaderSection);
procedure SectionDragEndQuery(Section: TExHeaderSection; NewOrderPos: Integer; var AllowOperation: Boolean);
procedure SectionResize(Section: TExHeaderSection);
procedure SectionTrack(Section: TExHeaderSection; Width: Integer;
State: TSectionTrackState);
procedure CNDrawItem(var Message: TWMDrawItem);
procedure CNNotify(var Message: TWMNotify);
procedure ImageListChange (Sender: TObject);
procedure SetExHeaderStyles(Value: TExHeaderStyles);
procedure SetImages (Value: TImageList);
procedure SetSections(Value: TExHeaderSections);
procedure UpdateItem(Message, Index: Integer);
procedure UpdateSection(Index: Integer);
procedure UpdateSections;
procedure WMLButtonDown(var Message: TWMLButtonDown);
procedure WMSize(var Message: TWMSize);
procedure WMWindowPosChanged(var Message: TWMWindowPosChanged);| Properties |
property Align :
property DragCursor :
property DragMode :
property Enabled :
property ExtendedStyles : TExHeaderStyles
property Font :
property Images : TImageList
property ParentFont :
property ParentShowHint :
property PopupMenu :
property Sections : TExHeaderSections
property ShowHint :
property Visible :
property Canvas : TCanvas| Events |
event OnDividerDblClick : TSectionNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnDrawSection : TDrawSectionEvent
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnResize : TNotifyEvent
event OnSectionCallBack : TSectionCallBackEvent
event OnSectionClick : TSectionNotifyEvent
event OnSectionDblClick : TSectionNotifyEvent
event OnSectionDragBegin : TSectionDragBeginEvent
event OnSectionDragEnd : TSectionNotifyEvent
event OnSectionDragEndQuery : TSectionDragEndQueryEvent
event OnSectionResize : TSectionNotifyEvent
event OnSectionTrack : TSectionTrackEvent
event OnStartDrag : | Variables |
FCanvas : TCanvas;
FExHeaderStyles : TExHeaderStyles;
FImageChangeLink : TChangeLink;
FImages : TImageList;
FOnDividerDblClick : TSectionNotifyEvent;
FOnDrawSection : TDrawSectionEvent;
FOnResize : TNotifyEvent;
FOnSectionCallBack : TSectionCallBackEvent;
FOnSectionClick : TSectionNotifyEvent;
FOnSectionDblClick : TSectionNotifyEvent;
FOnSectionDragBegin : TSectionDragBeginEvent;
FOnSectionDragEnd : TSectionNotifyEvent;
FOnSectionDragEndQuery : TSectionDragEndQueryEvent;
FOnSectionResize : TSectionNotifyEvent;
FOnSectionTrack : TSectionTrackEvent;
FSections : TExHeaderSections;| Constructors |
constructor Create(AOwner: TComponent);TExHeaderControl
| Functions |
destructor Destroy;
procedure LoadSettings(RegKey: String);SendMessage(Handle, HDM_SETIMAGELIST, 0, Longint(0));
procedure ReadArray(RegKey, ColType: String; ColCount: integer;
var IntArray: array of integer);
procedure SaveSettings(RegKey: String);
procedure StoreArray(regKey, colType: String; ColCount: integer;
const IntArray: array of integer);
procedure CreateParams(var Params: TCreateParams);
procedure CreateWnd;
procedure DividerDblClick(Section: TExHeaderSection);
procedure DrawSection(Section: TExHeaderSection; const Rect: TRect;
Pressed: Boolean);
procedure Notification(AComponent: TComponent;
Operation: TOperation);
procedure Resize;
procedure SectionClick(Section: TExHeaderSection);
procedure SectionDblClick(Section: TExHeaderSection);
procedure SectionDragBegin(Section: TExHeaderSection; var AllowOperation: Boolean);
procedure SectionDragEnd(Section: TExHeaderSection);
procedure SectionDragEndQuery(Section: TExHeaderSection; NewOrderPos: Integer; var AllowOperation: Boolean);
procedure SectionResize(Section: TExHeaderSection);
procedure SectionTrack(Section: TExHeaderSection; Width: Integer;
State: TSectionTrackState);
procedure CNDrawItem(var Message: TWMDrawItem);
procedure CNNotify(var Message: TWMNotify);
procedure ImageListChange (Sender: TObject);
procedure SetExHeaderStyles(Value: TExHeaderStyles);
procedure SetImages (Value: TImageList);SendMessage(Handle, HDM_SETIMAGELIST, 0, Longint(TImageList(Sender).Handle));
procedure SetSections(Value: TExHeaderSections);
procedure UpdateItem(Message, Index: Integer);
procedure UpdateSection(Index: Integer);
procedure UpdateSections;
procedure WMLButtonDown(var Message: TWMLButtonDown);with PHDDispInfoEx(Message.NMHdr)^ do begin case Hdr.code of HDN_GETDISPINFO: begin if Assigned(FOnSectionCallBack) then begin // myImageIndex := iImage; // myText := pszText; // FOnSectionCallBack(Self,Sections[Item], myImageIndex, myText); iImage := myImageIndex; pszText := PChar('Penguin!'); cchTextMax := Length(myText); end; end; end; end;
procedure WMSize(var Message: TWMSize);
procedure WMWindowPosChanged(var Message: TWMWindowPosChanged);| Properties |
property Align :
property DragCursor :
property DragMode :
property Enabled :
property ExtendedStyles : TExHeaderStyles
property Font :
property Images : TImageList
property ParentFont :
property ParentShowHint :
property PopupMenu :
property Sections : TExHeaderSections
property ShowHint :
property Visible :
property Canvas : TCanvas| Events |
event OnDividerDblClick : TSectionNotifyEvent
event OnDragDrop :
event OnDragOver :
event OnDrawSection : TDrawSectionEvent
event OnEndDrag :
event OnMouseDown :
event OnMouseMove :
event OnMouseUp :
event OnResize : TNotifyEvent
event OnSectionCallBack : TSectionCallBackEvent
event OnSectionClick : TSectionNotifyEvent
event OnSectionDblClick : TSectionNotifyEvent
event OnSectionDragBegin : TSectionDragBeginEvent
event OnSectionDragEnd : TSectionNotifyEvent
event OnSectionDragEndQuery : TSectionDragEndQueryEvent
event OnSectionResize : TSectionNotifyEvent
event OnSectionTrack : TSectionTrackEvent
event OnStartDrag : | Variables |
FCanvas : TCanvas;
FExHeaderStyles : TExHeaderStyles;
FImageChangeLink : TChangeLink;
FImages : TImageList;
FOnDividerDblClick : TSectionNotifyEvent;
FOnDrawSection : TDrawSectionEvent;
FOnResize : TNotifyEvent;
FOnSectionCallBack : TSectionCallBackEvent;
FOnSectionClick : TSectionNotifyEvent;
FOnSectionDblClick : TSectionNotifyEvent;
FOnSectionDragBegin : TSectionDragBeginEvent;
FOnSectionDragEnd : TSectionNotifyEvent;
FOnSectionDragEndQuery : TSectionDragEndQueryEvent;
FOnSectionResize : TSectionNotifyEvent;
FOnSectionTrack : TSectionTrackEvent;
FSections : TExHeaderSections;