IDE: when compile of an install package failed: more verbose buttons

git-svn-id: trunk@28056 -
This commit is contained in:
mattias 2010-11-03 14:45:03 +00:00
parent 56f71a1c43
commit 5ca80379a2
2 changed files with 5 additions and 2 deletions

View File

@ -4953,6 +4953,8 @@ resourcestring
lisWarningThisIsTheMainUnitTheNewMainUnitWillBePas = '%sWarning: This is '
+'the main unit. The new main unit will be %s.pas.';
lisDirectivesForNewUnit = 'Directives for new unit';
lisRemoveFromInstallList = 'Remove from install list';
lisKeepInInstallList = 'Keep in install list';
implementation

View File

@ -3286,10 +3286,11 @@ begin
// a package needed for installation failed to compile
// -> ask user if the package should be removed from the installation
// list
MsgResult:=IDEMessageDialog(lisInstallationFailed,
MsgResult:=IDEQuestionDialog(lisInstallationFailed,
Format(lisPkgMangThePackageFailedToCompileRemoveItFromTheInstallati,
['"', APackage.IDAsString, '"', #13]), mtConfirmation,
[mbYes,mbIgnore]);
[mrYes, lisRemoveFromInstallList, mrIgnore, lisKeepInInstallList
]);
if MsgResult=mrIgnore then
IgnoreQuestions.Add(GetIgnoreIdentifier,iiid24H)
else if MsgResult=mrYes then