Class TFormInfo (unit RplWizInfo)

Inherits from

TObject

Constructors


constructor Create(FormIntf: TIFormInterface);

TFormInfo


Functions

destructor Destroy;


procedure GetMatchingComponents(List: TStrings; OldType: string);

Fill List with the names of all components whose type is OldType.

procedure GetSelectedComponents(List: TStrings; OldType: string);

Examine all selected components, and add to the list any components whose type is OldType.

function ReplaceComponents(List: TStrings; NewType: string): Integer;

Replace all the components whose names are in List.

function FindComponent(CompIntf: TIComponentInterface): TCompInfo;

Look up the component represented by CompIntf.

Properties

property Component : TCompInfo


property FormInterface : TIFormInterface


Events

Variables

fCompInfo : TCompInfo;


fInterface : TIFormInterface;



Constructors


constructor Create(FormIntf: TIFormInterface);

TFormInfo


Functions


destructor Destroy;


procedure GetMatchingComponents(List: TStrings; OldType: string);

Fill List with the names of all components whose type is OldType.


procedure GetSelectedComponents(List: TStrings; OldType: string);

Examine all selected components, and add to the list any components whose type is OldType. Also search the children of selected components.


function ReplaceComponents(List: TStrings; NewType: string): Integer;

Replace all the components whose names are in List. Replace them with new components of type NewType. Return the number of replacements performed.


function FindComponent(CompIntf: TIComponentInterface): TCompInfo;

Look up the component represented by CompIntf.


Properties


property Component : TCompInfo


property FormInterface : TIFormInterface


Events


Variables


fCompInfo : TCompInfo;


fInterface : TIFormInterface;