Class TfrmShowHideObjects

Unit

type TfrmShowHideObjects = class(TfrmCustomSelectObjects)

TfrmShowHideObjects is used to show or hide TScreenObjects either individually or based on the data sets or boundary conditions they affect.

	`pmSelectEdit: TPopupMenu;`
	`miSelect: TMenuItem;`
	`miEdit: TMenuItem;`
	`FUndoShowHide: TUndoShowHideScreenObject;`
	`FCount: integer;`
	`FSupressUndo: boolean;`

	`procedure FormClose(Sender: TObject; var Action: TCloseAction);`
	`procedure FormCreate(Sender: TObject); override;`
	`procedure miEditClick(Sender: TObject);`
	`procedure miSelectClick(Sender: TObject);`
	`procedure FormShow(Sender: TObject);`
	`procedure vstObjectsChecked(Sender: TBaseVirtualTree; Node: PVirtualNode);`
	`procedure vstObjectsContextPopup(Sender: TObject; MousePos: TPoint; var Handled: Boolean);`
	`procedure vstObjectsPaintText(Sender: TBaseVirtualTree; const TargetCanvas: TCanvas; Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType);`
	`procedure FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);`
	`function GetSelectedScreenObject: TScreenObject;`
	`procedure vstEnablePopupMenuItems(Node: PVirtualNode);`
	`procedure SetCanEdit(const Value: boolean); override;`
	`function ShouldCheckBoxBeChecked(ScreenObject: TScreenObject): boolean; override;`
	`procedure HandleChecked(AScreenObject: TScreenObject); override;`
	`procedure HandleUnchecked(AScreenObject: TScreenObject); override;`

property SupressUndo: boolean read FSupressUndo write FSupressUndo;

	`pmSelectEdit: TPopupMenu;`
`pmSelectEdit` is associated with vstObjects and holds miSelect and miSelect; See vstObjectsContextPopup.

	`miSelect: TMenuItem;`
`miSelect` is the Select menu item of pmSelectEdit. Clicking it selects the TScreenObject of the selected node.

	`miEdit: TMenuItem;`
`miEdit` is the Edit menu item of pmSelectEdit. Clicking it edits the TScreenObject of the selected node.

	`FUndoShowHide: TUndoShowHideScreenObject;`

	`FCount: integer;`

	`FSupressUndo: boolean;`

	`procedure FormClose(Sender: TObject; var Action: TCloseAction);`
`FormClose` calls Release and sets frmShowHideObjects to nil.

	`procedure FormCreate(Sender: TObject); override;`
`FormCreate` is the event handler for the OnCreate event of `TfrmShowHideObjects`.

	`procedure miEditClick(Sender: TObject);`
See miEdit. Also the event handler for vstObjects.OnDblClick.

	`procedure miSelectClick(Sender: TObject);`
See miSelect.

	`procedure FormShow(Sender: TObject);`
`FormShow` calls AdjustFormPosition.

	`procedure vstObjectsChecked(Sender: TBaseVirtualTree; Node: PVirtualNode);`
`vstObjectsChecked` is used to show or hide TScreenObjects when a checkbox is checked or unchecked.

	`procedure vstObjectsContextPopup(Sender: TObject; MousePos: TPoint; var Handled: Boolean);`
`vstObjectsContextPopup` is used to enable or disable items in pmSelectEdit

	`procedure vstObjectsPaintText(Sender: TBaseVirtualTree; const TargetCanvas: TCanvas; Node: PVirtualNode; Column: TColumnIndex; TextType: TVSTTextType);`

	`procedure FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);`

	`function GetSelectedScreenObject: TScreenObject;`
`GetSelectedScreenObject` gets the TScreenObject associated with the selected node in vstObjects.

	`procedure vstEnablePopupMenuItems(Node: PVirtualNode);`
`vstEnablePopupMenuItems` enables the menu items in pmSelectEdit if Node.Parent has a list of TScreenObject in its Data.

	`procedure SetCanEdit(const Value: boolean); override;`
See CanEdit.

	`function ShouldCheckBoxBeChecked(ScreenObject: TScreenObject): boolean; override;`

	`procedure HandleChecked(AScreenObject: TScreenObject); override;`

	`procedure HandleUnchecked(AScreenObject: TScreenObject); override;`

	`property SupressUndo: boolean read FSupressUndo write FSupressUndo;`

Generated by PasDoc 0.12.1 on 2013-05-13 15:41:40