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

project groups: clear messages window

Browse Source 
git-svn-id: trunk@50407 -
This commit is contained in:
mattias 2015-11-18 22:21:48 +00:00
parent 0b7a5c0c34
commit da3a514405
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/projectgroups/projectgroup.pp
View File

@ -15,7 +15,7 @@ uses
Classes, SysUtils, contnrs, Laz2_XMLCfg, Controls, Forms, Dialogs, LCLProc,
LazFileUtils, LazFileCache, LazConfigStorage, FileUtil, PackageIntf,
ProjectIntf, MenuIntf, LazIDEIntf, IDEDialogs, CompOptsIntf, BaseIDEIntf,
IDECommands, IDEExternToolIntf, MacroIntf, ProjectGroupIntf,
IDECommands, IDEExternToolIntf, MacroIntf, IDEMsgIntf, ProjectGroupIntf,
ProjectGroupStrConst, FileProcs, CodeToolManager, CodeCache;
const
@ -1064,6 +1064,8 @@ begin
taCompileClean:
begin
// run lazbuild as external tool
IDEMessagesWindow.Clear;
aTitle:='Compile Project '+ExtractFileNameOnly(Filename);
aCompileHint:='Project Group: '+Parent.Filename+LineEnding;