Class TThreadForm (unit Formpage)

Inherits from

TScaleForm

Constructors


constructor Create(AOwner: TComponent);

TThreadForm -----------------------------------------------------------------


Functions

destructor Destroy;


procedure DoHide;

if not FShowThread.

procedure DoShow;


procedure Paint;


procedure SetShowGrayed(Value: Boolean);


procedure SetShowThread(Value: TShowThread);


procedure SetStartThread(Value: TStartThread);


procedure OnUM_DestroyThread(var message: TMessage);


procedure OnUM_RESETCURSOR(var message: TMessage);

if no FShowThread is created, create default:

Properties

property ShowGrayed : Boolean


property ShowThread : TShowThread


property StartThread : TStartThread


Events

Variables

FShowGrayed : Boolean;


FShowThread : TShowThread;


FStartThread : TStartThread;



Constructors


constructor Create(AOwner: TComponent);

TThreadForm -----------------------------------------------------------------


Functions


destructor Destroy;


procedure DoHide;

if not FShowThread.Destroying then


procedure DoShow;


procedure Paint;


procedure SetShowGrayed(Value: Boolean);


procedure SetShowThread(Value: TShowThread);


procedure SetStartThread(Value: TStartThread);


procedure OnUM_DestroyThread(var message: TMessage);


procedure OnUM_RESETCURSOR(var message: TMessage);

if no FShowThread is created, create default:


Properties


property ShowGrayed : Boolean


property ShowThread : TShowThread


property StartThread : TStartThread


Events


Variables


FShowGrayed : Boolean;


FShowThread : TShowThread;


FStartThread : TStartThread;