Class TAutoAlignPanel (unit INIUtil)

Inherits from

TPanel

Constructors


constructor Create(AOwner:TComponent);



Functions

procedure BeginUpdate;


procedure EndUpdate(DoResize:Boolean);


function HasControlTag(No:LongInt):Boolean;


procedure Resize;


procedure SetBorders(xBor,yBor:Integer);


procedure SetDistances(xDist,yDist:Integer);


function GetControl(var Order:Integer):TControl;


procedure Notification(AComponent:TComponent;Operation:TOperation);


function GetBorder(Index:Integer):Integer;


function GetDistance(Index:Integer):Integer;


function GetWinCtrl(ir,ic:Integer):TControl;


function NextControl:TControl;


procedure ResetIterator;


procedure SetBorder(Index:Integer;bor:Integer);


procedure SetDistance(Index:Integer;Distance:Integer);


procedure SetRows(r:Integer);


procedure SetWinCtrl(ir,ic:Integer;wCtrl:TControl);


Properties

property BorderX : Integer


property BorderY : Integer


property DistanceHor : Integer


property DistanceVer : Integer


property Rows : Integer


property WinCtrls : TControl


Events

event OnlyVisible : Boolean


Variables

FBorders : array[0..1] of Integer;


FDistances : array[0..1] of Integer;


FOnlyVisible : Boolean;


FRows : Integer;


FUpdating : Boolean;


FWinCtrls : TWinControlsIn2D;


InRow : Integer;


Iterator : Integer;


NOfSB : Integer;



Constructors


constructor Create(AOwner:TComponent);


Functions


procedure BeginUpdate;


procedure EndUpdate(DoResize:Boolean);


function HasControlTag(No:LongInt):Boolean;


procedure Resize;


procedure SetBorders(xBor,yBor:Integer);


procedure SetDistances(xDist,yDist:Integer);


function GetControl(var Order:Integer):TControl;


procedure Notification(AComponent:TComponent;Operation:TOperation);


function GetBorder(Index:Integer):Integer;


function GetDistance(Index:Integer):Integer;


function GetWinCtrl(ir,ic:Integer):TControl;


function NextControl:TControl;


procedure ResetIterator;


procedure SetBorder(Index:Integer;bor:Integer);


procedure SetDistance(Index:Integer;Distance:Integer);


procedure SetRows(r:Integer);


procedure SetWinCtrl(ir,ic:Integer;wCtrl:TControl);


Properties


property BorderX : Integer


property BorderY : Integer


property DistanceHor : Integer


property DistanceVer : Integer


property Rows : Integer


property WinCtrls : TControl


Events


event OnlyVisible : Boolean


Variables


FBorders : array[0..1] of Integer;


FDistances : array[0..1] of Integer;


FOnlyVisible : Boolean;


FRows : Integer;


FUpdating : Boolean;


FWinCtrls : TWinControlsIn2D;


InRow : Integer;


Iterator : Integer;


NOfSB : Integer;