mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-22 11:20:36 +02:00
IDE: prevent crash when pressing F5 while source editor is closed.
git-svn-id: trunk@46464 -
This commit is contained in:
parent
4c6fbfdc2d
commit
ba93502046
@ -3333,8 +3333,12 @@ begin
|
|||||||
ecToggleObjectInsp: mnuViewInspectorClicked(Self);
|
ecToggleObjectInsp: mnuViewInspectorClicked(Self);
|
||||||
ecToggleSearchResults: mnuViewSearchResultsClick(Self);
|
ecToggleSearchResults: mnuViewSearchResultsClick(Self);
|
||||||
ecAboutLazarus: MainIDEBar.itmHelpAboutLazarus.OnClick(Self);
|
ecAboutLazarus: MainIDEBar.itmHelpAboutLazarus.OnClick(Self);
|
||||||
ecToggleBreakPoint: SourceEditorManager.ActiveSourceWindow.ToggleBreakpointClicked(Self);
|
ecToggleBreakPoint:
|
||||||
ecRemoveBreakPoint: SourceEditorManager.ActiveSourceWindow.DeleteBreakpointClicked(Self);
|
if Assigned(SourceEditorManager.ActiveSourceWindow) then
|
||||||
|
SourceEditorManager.ActiveSourceWindow.ToggleBreakpointClicked(Self);
|
||||||
|
ecRemoveBreakPoint:
|
||||||
|
if Assigned(SourceEditorManager.ActiveSourceWindow) then
|
||||||
|
SourceEditorManager.ActiveSourceWindow.DeleteBreakpointClicked(Self);
|
||||||
ecProcedureList: mnuSearchProcedureList(self);
|
ecProcedureList: mnuSearchProcedureList(self);
|
||||||
ecInsertGUID: mnuSourceInsertGUID(self);
|
ecInsertGUID: mnuSourceInsertGUID(self);
|
||||||
ecInsertFilename: mnuSourceInsertFilename(self);
|
ecInsertFilename: mnuSourceInsertFilename(self);
|
||||||
|
Loading…
Reference in New Issue
Block a user