paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-25 23:43:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

IdeIntf: procedure DoAfterComponentAdded does not need to be virtual. Formatting.

Browse Source
This commit is contained in:
Juha 2022-11-21 09:19:41 +02:00
parent ecdb59db7c
commit fa711164a9
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/ideintf/componentreg.pas
View File

@ -276,7 +276,7 @@ type
procedure SetSelectedComp(AComponent: TRegisteredComponent; AMulti: Boolean);
// Registered handlers
procedure DoAfterComponentAdded(ALookupRoot, AComponent: TComponent;
ARegisteredComponent: TRegisteredComponent); virtual;
ARegisteredComponent: TRegisteredComponent);
procedure DoAfterSelectionChanged;
procedure DoAfterUpdate;
procedure RemoveAllHandlersOfObject(AnObject: TObject);

6
ide/main.pp
View File

@ -13430,10 +13430,10 @@ begin
AComponent.ClassName, ' not registered');
exit;
end;
//debugln('TMainIDE.PropHookPersistentAdded B ',AComponent.Name,':',AComponent.ClassName);
//DebugLn('TMainIDE.PropHookPersistentAdded B ',AComponent.Name,':',AComponent.ClassName);
// set component into design mode
SetDesigning(AComponent,true);
//debugln('TMainIDE.PropHookPersistentAdded C ',AComponent.Name,':',AComponent.ClassName);
//DebugLn('TMainIDE.PropHookPersistentAdded C ',AComponent.Name,':',AComponent.ClassName);
// add to source
FComponentAddedDesigner:=FindRootDesigner(AComponent) as TDesigner;
if FComponentAddedDesigner<>nil then
@ -13467,7 +13467,7 @@ begin
// Update Object Inspector
if ObjectInspector1<>nil then // Moving this to Idle handler somehow removes
ObjectInspector1.FillComponentList(False); // selection of pasted components!
//debugln('TMainIDE.PropHookPersistentAdded END ',dbgsName(APersistent),' Select=',Select);
//DebugLn(['TMainIDE.PropHookPersistentAdded END ',dbgsName(APersistent),' Select=',Select]);
end;
procedure TMainIDE.PropHookPersistentDeleting(APersistent: TPersistent);