ide: a trial to make IDE with EnableNewExtTools

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

View File

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

View File

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