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

IdeIntf: Remove update events for ComponentPalette from TLazIDEInterface.

Browse Source 
git-svn-id: trunk@50244 -
This commit is contained in:
juha 2015-11-07 16:37:25 +00:00
parent 8cccad8aad
commit 89738efcb7
1 changed files with 3 additions and 42 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
components/ideintf/lazideintf.pas
View File

@ -181,8 +181,6 @@ type
lihtGetFPCFrontEndPath, // called when the IDE gets the path of the 'fpc' front end tool
lihtShowDesignerFormOfSource, // called after showing a designer form for code editor (AEditor can be nil!)
lihtShowSourceOfActiveDesignerForm, // called after showing a code of designer form
lihtUpdateIDEComponentPalette,
lihtUpdateComponentPageControl,
lihtChangeToolStatus//called when IDEToolStatus has changed (e.g. itNone->itBuilder etc.)
);
@ -438,16 +436,6 @@ type
procedure RemoveHandlerGetFPCFrontEndPath(
const Handler: TGetFPCFrontEndPath);
function CallHandlerGetFPCFrontEndPath(Sender: TObject; var Path: string): boolean;
procedure AddHandlerOnUpdateIDEComponentPalette(
const OnUpdateIDEComponentPaletteEvent: TNotifyEvent;
AsLast: boolean = false);
procedure RemoveHandlerOnUpdateIDEComponentPalette(
const OnUpdateIDEComponentPaletteEvent: TNotifyEvent);
procedure AddHandlerOnUpdateComponentPageControl(
const OnUpdateComponentPageControlEvent: TNotifyEvent;
AsLast: boolean = false);
procedure RemoveHandlerOnUpdateComponentPageControl(
const OnUpdateComponentPageControlEvent: TNotifyEvent);
procedure AddHandlerOnShowDesignerFormOfSource(
const OnShowDesignerFormOfSourceEvent: TShowDesignerFormOfSourceFunction;
AsLast: boolean = false);
@ -683,8 +671,7 @@ begin
end;
procedure TLazIDEInterface.DoCallBuildingFinishedHandler(
HandlerType: TLazarusIDEHandlerType; Sender: TObject; BuildSuccessful: Boolean
);
HandlerType: TLazarusIDEHandlerType; Sender: TObject; BuildSuccessful: Boolean);
var
I: Integer;
xMethod: TLazBuildingFinishedEvent;
@ -827,8 +814,7 @@ begin
end;
procedure TLazIDEInterface.AddHandlerOnProjectDependenciesCompiled(
const OnProjDependenciesCompiledEvent: TModalResultFunction; AsLast: boolean
);
const OnProjDependenciesCompiledEvent: TModalResultFunction; AsLast: boolean);
begin
AddHandler(lihtProjectDependenciesCompiled,
TMethod(OnProjDependenciesCompiledEvent),AsLast);
@ -886,8 +872,7 @@ begin
end;
procedure TLazIDEInterface.AddHandlerOnProjectBuildingFinished(
const OnProjBuildingFinishedEvent: TLazBuildingFinishedEvent; AsLast: boolean
);
const OnProjBuildingFinishedEvent: TLazBuildingFinishedEvent; AsLast: boolean);
begin
AddHandler(lihtProjectBuildingFinished,TMethod(OnProjBuildingFinishedEvent),AsLast);
end;
@ -930,30 +915,6 @@ begin
Result:=true;
end;
procedure TLazIDEInterface.AddHandlerOnUpdateIDEComponentPalette(
const OnUpdateIDEComponentPaletteEvent: TNotifyEvent; AsLast: boolean);
begin
AddHandler(lihtUpdateIDEComponentPalette,TMethod(OnUpdateIDEComponentPaletteEvent),AsLast);
end;
procedure TLazIDEInterface.RemoveHandlerOnUpdateIDEComponentPalette(
const OnUpdateIDEComponentPaletteEvent: TNotifyEvent);
begin
RemoveHandler(lihtUpdateIDEComponentPalette,TMethod(OnUpdateIDEComponentPaletteEvent));
end;
procedure TLazIDEInterface.AddHandlerOnUpdateComponentPageControl(
const OnUpdateComponentPageControlEvent: TNotifyEvent; AsLast: boolean);
begin
AddHandler(lihtUpdateComponentPageControl,TMethod(OnUpdateComponentPageControlEvent),AsLast);
end;
procedure TLazIDEInterface.RemoveHandlerOnUpdateComponentPageControl(
const OnUpdateComponentPageControlEvent: TNotifyEvent);
begin
RemoveHandler(lihtUpdateComponentPageControl,TMethod(OnUpdateComponentPageControlEvent));
end;
procedure TLazIDEInterface.AddHandlerOnShowDesignerFormOfSource(
const OnShowDesignerFormOfSourceEvent: TShowDesignerFormOfSourceFunction; AsLast: boolean);
begin