Class TCreateInfo (unit INISec)

Inherits from

TObject

Constructors


constructor Create(CI:TCreateInfo);

TCreateInfo


Functions

procedure FirstColumn;


procedure FirstRow;


function NextColumn:Boolean;


function NextRow:Boolean;


procedure NoTitle;


function TextHeight(const Msg:string):Integer;


function TextWidth(const Msg:string):Integer;


function GetState:TCreateInfoState;


procedure SetCurrentColumn(cColumn:Integer);


procedure SetState(State:TCreateInfoState);


Properties

property Calculated : Boolean


property CaptionStyle : TCaptionStyle


property cCol : Integer


property cHeight : Integer


property Cols : Integer


property ControlDistance : Integer


property cRow : Integer


property CtrlH : Integer


property CtrlW : Integer


property cWidth : Integer


property Direction : TCreateDirection


property H : Integer


property InitX : Integer


property InitY : Integer


property NeighborhoodControl : TControl


property RO : Boolean


property Title : string


property Titled : Boolean


property W : Integer


property X : Integer


property XBor : Integer


property Y : Integer


property YBor : Integer


Events

Variables

fCalculated : Boolean;


fCanvas : TCanvas;


fCaptionStyle : TCaptionStyle;


fcCol : Integer;


fcHeight : Integer;


fCols : Integer;


fControlDistance : Integer;


fcRow : Integer;


fCtrlH : Integer;


fCtrlW : Integer;


fcWidth : Integer;


fDirection : TCreateDirection;


fH : Integer;


fInitX : Integer;


fInitY : Integer;


fMaxCtrlH : Integer;


fNeighborhoodControl : TControl;


fRO : Boolean;


fTitle : string;


fTitled : Boolean;


fW : Integer;


fX : Integer;


fXBor : Integer;


fY : Integer;


fYBor : Integer;



Constructors


constructor Create(CI:TCreateInfo);

TCreateInfo


Functions


procedure FirstColumn;


procedure FirstRow;


function NextColumn:Boolean;


function NextRow:Boolean;


procedure NoTitle;


function TextHeight(const Msg:string):Integer;


function TextWidth(const Msg:string):Integer;


function GetState:TCreateInfoState;


procedure SetCurrentColumn(cColumn:Integer);


procedure SetState(State:TCreateInfoState);


Properties


property Calculated : Boolean


property CaptionStyle : TCaptionStyle


property cCol : Integer


property cHeight : Integer


property Cols : Integer


property ControlDistance : Integer


property cRow : Integer


property CtrlH : Integer


property CtrlW : Integer


property cWidth : Integer


property Direction : TCreateDirection


property H : Integer


property InitX : Integer


property InitY : Integer


property NeighborhoodControl : TControl


property RO : Boolean


property Title : string


property Titled : Boolean


property W : Integer


property X : Integer


property XBor : Integer


property Y : Integer


property YBor : Integer


Events


Variables


fCalculated : Boolean;


fCanvas : TCanvas;


fCaptionStyle : TCaptionStyle;


fcCol : Integer;


fcHeight : Integer;


fCols : Integer;


fControlDistance : Integer;


fcRow : Integer;


fCtrlH : Integer;


fCtrlW : Integer;


fcWidth : Integer;


fDirection : TCreateDirection;


fH : Integer;


fInitX : Integer;


fInitY : Integer;


fMaxCtrlH : Integer;


fNeighborhoodControl : TControl;


fRO : Boolean;


fTitle : string;


fTitled : Boolean;


fW : Integer;


fX : Integer;


fXBor : Integer;


fY : Integer;


fYBor : Integer;