Class TBWHeaderSection (unit BWHeader)

Inherits from

TPersistent

Constructors


constructor Create(AOwner:TCustomBWHeader);

=============================================================================


Functions

procedure Assign(source:TPersistent);


procedure UpdateSection;


function GetIndex:integer;


function GetLeft:integer;


function GetRight:integer;


procedure SetAlignment(value:TBWSAlignment);


procedure SetMaxWidth(value:integer);


procedure SetMinWidth(value:integer);


procedure SetSortMode(value:TBWSSortMode);


procedure SetStyle(value:TBWSectionStyle);


procedure SetText(value:string);


procedure SetVisible(value:boolean);

if Self.

procedure SetWidth(value:integer);


Properties

property Alignment : TBWSAlignment


property AllowClick : boolean


property Data : pointer


property Index : integer


property Left : integer


property MaxWidth : integer


property MinWidth : integer


property Right : integer


property SortMode : TBWSSortMode


property Style : TBWSectionStyle


property Text : string


property Visible : boolean


property Width : integer


Events

Variables

FAlignment : TBWSAlignment;


FAllowClick : boolean;


FData : pointer;


FMaxWidth : integer;


FMinWidth : integer;


FOwner : TCustomBWHeader;


FSortMode : TBWSSortMode;


FStyle : TBWSectionStyle;


FText : string;


FVisible : boolean;


FWidth : integer;



Constructors


constructor Create(AOwner:TCustomBWHeader);

=============================================================================


Functions


procedure Assign(source:TPersistent);


procedure UpdateSection;


function GetIndex:integer;


function GetLeft:integer;


function GetRight:integer;


procedure SetAlignment(value:TBWSAlignment);


procedure SetMaxWidth(value:integer);


procedure SetMinWidth(value:integer);


procedure SetSortMode(value:TBWSSortMode);


procedure SetStyle(value:TBWSectionStyle);


procedure SetText(value:string);


procedure SetVisible(value:boolean);

if Self.Index=FOwner.Sections.count-1 then begin r:=Self.Right; if ((r<>FOwner.Width) and (FOwner.ResizeRight)) then FOwner.Width:=r; end; // Left for ResizeRight Property


procedure SetWidth(value:integer);


Properties


property Alignment : TBWSAlignment


property AllowClick : boolean


property Data : pointer


property Index : integer


property Left : integer


property MaxWidth : integer


property MinWidth : integer


property Right : integer


property SortMode : TBWSSortMode


property Style : TBWSectionStyle


property Text : string


property Visible : boolean


property Width : integer


Events


Variables


FAlignment : TBWSAlignment;


FAllowClick : boolean;


FData : pointer;


FMaxWidth : integer;


FMinWidth : integer;


FOwner : TCustomBWHeader;


FSortMode : TBWSSortMode;


FStyle : TBWSectionStyle;


FText : string;


FVisible : boolean;


FWidth : integer;