KCL Design System - TKclDesignCenter
|
|
Version 1.00
|
TKclDesignCenter is the nexus
for the set of KCL Design Control/Components. After setting its properties:
CompPalleteToolBar, CompTreeView, DesignManager, DesignPopupMenu and ObjInspector
either in design time or in run time, you get a perfect design system with
these control/components work together as Delphi's.
Unit
KclDesignConsole
Hierarchy
TObject - TPersistent - TComponent
- TKclDesignCenter
Properties
- DesignStage: TWinControl (ReadOnly)
The current design stage. The same
as DesignManager's DesignStage property.
Whether the design form has been
modified in either DesignManager, CompTreeView, ObjInspector or DesignPopupMenu.
You have to manually set this property to False.
- PalleteSelectedClass: TComponentClass (ReadOnly)
Current selected class in CompPalleteToolbar.
- SelCompList: TComponentList (ReadOnly)
Current selected components both
in DesignStage and CompTreeView.
This property controls the Enabled
property of DesignManager. If PersistEnabled
is True, when the new DesignManager property is setted, DesignManager.Enabled
property will be set to DesignCenter.Enabled, else, DesignCenter.Enabled
will be change to the same as DesignManager.Enabled.
See the property
Enabled.
- CompPalleteToolbar: TKclCompPalleteToolBar
The component palette tool bar
of the design environment.
- CompTreeView: TKclCompTreeView
The component TreeView of the design
environment.
- DesignManager: TKclDesignManager
The DesignManager of the design
environment. We recommend you to set this property in runtime instead of
in design time.
- DesignPopupMenu: TPopupMenu
The popup menu that would pop up
in DesignStage and CompTreeView. Oftenly, we set a TKclDesignCompPopupMenu
instance to this property.
- ObjInspector: TKclObjInspector
The DesignManager of the design
environment.
Events
- AfterDynInsComponent: TDynInsComponentEvent
Occurs after a component is dynamicly
insert to the DesignStage from the CompPalleteToolbar.
- OnCompsChange: TNotifyEvent
Occurs when selected component(s)
is(are) changed.
- OnControlsMoved: TNotifyEvent
Occurs when selected control(s)
is(are) moved in DesignStage by dragging.
- OnInspectorPropChange: TNotifyEvent
Occurs when user changes component(s)
property in ObjInspector.
- OnStageMouseMove: TMouseMoveEvent
Occurs when the mouse moves on
the DesignStage or any control on the DesignStage.
Methods
constructor Create(AOwner:
TComponent); override;
destructor Destroy;
override;
procedure CopySelComps
;
Copy selected component(s) to clipboard.
Copy selected component(s) to clipboard.
Deselect current selected
components and controls.
procedure DeselectComponent
;
Deselect all components but reserve
controls in SelCompList.
procedure DeselectControl
;
Deselect all controls but reserve
components in SelCompList.
Paste components from clipboard.
procedure Refresh;
virtual
;
Refresh CompTreeView, DesignManager
and ObjInspector related to DesignCenter.
procedure SelectAllControls
;
Select all controls on the DesignStage.
Demos
DfmBuilder
MQY Studio 2002.12