Class TVpe (unit peedit2)

Inherits from

TLabel

Constructors


Constructor Create(AOwner : TComponent);



Functions

Procedure Activate;

Causes visual value to be updated

Procedure Deactivating(Sender : TObject);


Destructor Destroy;


Procedure DoActivate(Sender : TObject);

nil is a dummy anyway

Procedure Renew;

Only set the caption if we all agree

Procedure UpdateCaption;


Procedure FixBounds;


procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);


Procedure SetOnEditSubProperties(Value : TNotifyEvent);


Procedure SetPropertyEditor(Value : TPropertyEditor);


Properties

property PropertyEditor : TPropertyEditor


Events

event OnActivate : TNotifyEvent


event OnEditSubProperties : TNotifyEvent


Variables

FOnActivate : TNotifyEvent;


FOnEditSubProperties : TNotifyEvent;


FPropertyEditor : TPropertyEditor;


FVisualPropertyEditor : TVisualPropertyEditor;



Constructors


Constructor Create(AOwner : TComponent);


Functions


Procedure Activate;

Causes visual value to be updated


Procedure Deactivating(Sender : TObject);


Destructor Destroy;


Procedure DoActivate(Sender : TObject);

nil is a dummy anyway


Procedure Renew;

Only set the caption if we all agree


Procedure UpdateCaption;


Procedure FixBounds;


procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);


Procedure SetOnEditSubProperties(Value : TNotifyEvent);


Procedure SetPropertyEditor(Value : TPropertyEditor);


Properties


property PropertyEditor : TPropertyEditor


Events


event OnActivate : TNotifyEvent


event OnEditSubProperties : TNotifyEvent


Variables


FOnActivate : TNotifyEvent;


FOnEditSubProperties : TNotifyEvent;


FPropertyEditor : TPropertyEditor;


FVisualPropertyEditor : TVisualPropertyEditor;