paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-02 00:20:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDEIntf: added FormEditingHook.CreateUniqueComponentName

Browse Source 
git-svn-id: trunk@22497 -
This commit is contained in:
mattias 2009-11-09 10:41:47 +00:00
parent fe2c673f3e
commit b871c78205
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/customformeditor.pp
View File

@ -240,9 +240,9 @@ each control that's dropped onto the form
function GetComponentEditor(AComponent: TComponent): TBaseComponentEditor;
// component creation
function CreateUniqueComponentName(AComponent: TComponent): string;
function CreateUniqueComponentName(AComponent: TComponent): string; override;
function CreateUniqueComponentName(const AClassName: string;
OwnerComponent: TComponent): string;
OwnerComponent: TComponent): string; override;
function CreateComponentInterface(AComponent: TComponent;
WithOwnedChilds: Boolean): TIComponentInterface;
procedure CreateChildComponentInterfaces(AComponent: TComponent);

3
ideintf/formeditingintf.pas
View File

@ -158,6 +158,9 @@ type
): TIComponentInterface; virtual; abstract;
function FindComponent(AComponent: TComponent): TIComponentInterface; virtual; abstract;
function CreateUniqueComponentName(AComponent: TComponent): string; virtual; abstract;
function CreateUniqueComponentName(const AClassName: string;
OwnerComponent: TComponent): string; virtual; abstract;
function GetDefaultComponentParent(TypeClass: TComponentClass
): TIComponentInterface; virtual; abstract;
function GetDefaultComponentPosition(TypeClass: TComponentClass;