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

IDE: show messages window at Lazarus build. Issue #29606

Browse Source 
git-svn-id: trunk@51584 -
This commit is contained in:
ondrej 2016-02-10 21:23:01 +00:00
parent ac532977f7
commit ddcddf88d2
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/main.pp
View File

@ -7139,6 +7139,13 @@ begin
if DoAbortBuild(true)<>mrOK then exit;
// show messages
IDEWindowCreators.ShowForm(MessagesView,EnvironmentOptions.MsgViewFocus);
// clear old error lines
SourceEditorManager.ClearErrorLines;
SourceFileMgr.ArrangeSourceEditorAndMessageView(false);
Result:=DoSaveAll([sfDoNotSaveVirtualFiles]);
if Result<>mrOk then begin
DebugLn('Error: (lazarus) TMainIDE.DoBuildLazarus: failed because saving failed');
@ -7174,7 +7181,6 @@ begin
and (BuildLazProfiles.Current.IdeBuildMode<>bmBuild) then begin
PkgCompileFlags:=PkgCompileFlags+[pcfCompileDependenciesClean];
if BuildLazProfiles.Current.IdeBuildMode=bmCleanAllBuild then begin
SourceEditorManager.ClearErrorLines;
fBuilder.PackageOptions:='';
Result:=fBuilder.MakeLazarus(BuildLazProfiles.Current, [blfDontBuild]);
if Result<>mrOk then begin
@ -7225,7 +7231,6 @@ begin
end;
// make lazarus ide
SourceEditorManager.ClearErrorLines;
IDEBuildFlags:=IDEBuildFlags+[blfUseMakeIDECfg,blfDontClean];
Result:=fBuilder.MakeLazarus(BuildLazProfiles.Current, IDEBuildFlags);
DoCallBuildingFinishedHandler(lihtLazarusBuildingFinished, Self, Result=mrOk);