Class TDataAccessDebugBox (unit DebugBox)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);



Functions

procedure DisplayDebug(FComponent : TComponent);


function ReadFClassName : TComponent;


procedure SetHeight(A: Integer);


procedure SetPosition(A: TPositions);


procedure SetWidth(A: Integer);


procedure WriteFClassName(FComponent : TComponent);


Properties

property Height : Integer


property Position : TPositions


property Width : Integer


property DAComponentsOn : TComponent


Events

Variables

DebugForm : TForm;


FClassname : TComponent;


FHeight : Integer;


FPosition : TPositions;


FWidth : Integer;



Constructors


constructor Create(AOwner: TComponent);


Functions


procedure DisplayDebug(FComponent : TComponent);


function ReadFClassName : TComponent;


procedure SetHeight(A: Integer);


procedure SetPosition(A: TPositions);


procedure SetWidth(A: Integer);


procedure WriteFClassName(FComponent : TComponent);


Properties


property Height : Integer


property Position : TPositions


property Width : Integer


property DAComponentsOn : TComponent


Events


Variables


DebugForm : TForm;


FClassname : TComponent;


FHeight : Integer;


FPosition : TPositions;


FWidth : Integer;