paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-10 13:56:01 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: formatting

Browse Source 
git-svn-id: trunk@32701 -
This commit is contained in:
juha 2011-10-05 11:37:02 +00:00
parent 809dcf262d
commit 40f77bc7df
2 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/main.pp
View File

@ -17774,8 +17774,7 @@ begin
end else begin
DebugLn(['TMainIDE.OnPropHookShowMethod failed finding the method in code']);
DoJumpToCodeToolBossError;
raise Exception.Create(lisUnableToShowMethod+' '+lisPleaseFixTheErrorInTheMessageWindow
);
raise Exception.Create(lisUnableToShowMethod+' '+lisPleaseFixTheErrorInTheMessageWindow);
end;
end;
@ -17860,8 +17859,7 @@ end;
This handler is called whenever a new component was added to a designed form
and should be added to form source
-------------------------------------------------------------------------------}
procedure TMainIDE.OnPropHookPersistentAdded(APersistent: TPersistent;
Select: boolean);
procedure TMainIDE.OnPropHookPersistentAdded(APersistent: TPersistent; Select: boolean);
var
RegComp: TRegisteredComponent;
ADesigner: TDesigner;

3
ideintf/propedits.pp
View File

@ -5316,8 +5316,7 @@ begin
TPropHookComponentRenamed(FHandlers[htComponentRenamed][i])(AComponent);
end;
procedure TPropertyEditorHook.PersistentAdded(APersistent: TPersistent;
Select: boolean);
procedure TPropertyEditorHook.PersistentAdded(APersistent: TPersistent; Select: boolean);
var
i: Integer;
begin