TIDesigner

type TIDesigner = class(TObject)

protected

  FLookupRoot: TComponent;

Member with the value for the LookupRoot property.

  FDefaultFormBoundsValid: Boolean;

Member with the value for the DefaultFormBoundsValid property.

public

  function IsDesignMsg(); virtual; abstract;

Checks a message received from the Sender argument, and returns True if it is a design message.

  procedure UTF8KeyPress(); virtual; abstract;

Defines the method used to handle a key press event for a UTF-8-encoded character.

  procedure Modified; virtual; abstract;

Method when design is Modified.

  procedure Notification(); virtual; abstract;

Notification that the supplied Operation has been applied to the specified Component.

  procedure PaintGrid; virtual; abstract;

PaintGrid - method for painting the grid in the designer.

  procedure ValidateRename(); virtual; abstract;

ValidateRename - method to validate the Rename process.

  function GetShiftState; virtual; abstract;

Gets the value for the shift state (whether Shift, Ctrl, or Alt key).

  procedure SelectOnlyThisComponent(); virtual; abstract;

Method to select only the current component in the designer.

  function UniqueName(); virtual; abstract;

Returns a Unique name for the designer, using the BaseName as a starting point.

  procedure PrepareFreeDesigner(); virtual; abstract;

Prepares the design surface and frees the root control.

  property LookupRoot: TComponent; [r]

Component that is the root control in the form design surface.

  property DefaultFormBoundsValid: Boolean; [rw]

Indicates whether the bounds are valid after moving or sizing the form on the design surface.

end;

TIDesigner

The abstract base class for visual Form designers.

TObject

TCustomForm.Designer

The designer object when the form is in design mode.

FindRootDesigner

Gets the designer object for the specified persistent object (or its parent).