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

ide: a trial to make IDE with EnableNewExtTools

Browse Source 
git-svn-id: trunk@43230 -
This commit is contained in:
paul 2013-10-13 07:35:04 +00:00
parent 86a162998f
commit 5024ed8e23
2 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/lazbuild.lpr
View File

@ -36,7 +36,7 @@ uses
MacroIntf, PackageIntf, IDEDialogs, ProjectIntf, IDEExternToolIntf,
CompOptsIntf, LazIDEIntf,
// IDE
IDEProcs, InitialSetupDlgs, OutputFilter, CompilerOptions, ApplicationBundle,
IDEProcs, InitialSetupDlgs, CompilerOptions, ApplicationBundle,
TransferMacros, EnvironmentOpts, IDETranslations, LazarusIDEStrConsts,
IDECmdLine, ExtToolDialog, MiscOptions, Project, LazConf, PackageDefs,
PackageLinks, PackageSystem, BuildLazDialog, BuildProfileManager,

12
ide/projectuserresources.pas
View File

@ -1,9 +1,9 @@
{
/***************************************************************************
projecticon.pas - Lazarus IDE unit
projectuserresources.pas - Lazarus IDE unit
---------------------------------------
TProjectIcon is responsible for the inclusion of the
icon in windows executables as rc file and others as .lrs.
TProjectUserResources is responsible for the inclusion of the
custom resources in executables as res file
***************************************************************************/
@ -37,7 +37,7 @@ interface
uses
Classes, SysUtils, FileUtil, Laz2_XMLCfg, lazutf8classes, Process, LCLProc,
Controls, Graphics, Forms, CodeToolManager, FileProcs, LazConf, LResources,
ProjectIntf, ProjectResourcesIntf, IDEMsgIntf, LazarusIDEStrConsts,
ProjectIntf, ProjectResourcesIntf, IDEMsgIntf, IDEExternToolIntf, LazarusIDEStrConsts,
resource, bitmapresource, groupresource, groupiconresource, groupcursorresource;
type
@ -170,7 +170,11 @@ begin
end;
end
else
{$IFDEF EnableNewExtTools}
IDEMessagesWindow.AddCustomMessage(mluError,Format(lisFileNotFound2, ['"', Filename, '"', '']));
{$ELSE}
IDEMessagesWindow.AddMsg(Format(lisFileNotFound2, ['"', Filename, '"', '']), '', -1);
{$ENDIF}
end;
{ TResourceList }