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

changed mbOk to mbYes for asking to add unit to project

Browse Source 
git-svn-id: trunk@5188 -
This commit is contained in:
mattias 2004-02-10 00:45:50 +00:00
parent 235b2e1884
commit 61e525b79d
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ide/main.pp
View File

@ -5620,7 +5620,7 @@ begin
lisUnableToAddToProjectBecauseThereIsAlreadyAUnitWith, [s]), lisUnableToAddToProjectBecauseThereIsAlreadyAUnitWith, [s]),
mtInformation, [mbOk], 0); mtInformation, [mbOk], 0);
end else begin end else begin
if MessageDlg(Format(lisAddToProject, [s]), mtConfirmation, [mbOk, if MessageDlg(Format(lisAddToProject, [s]), mtConfirmation, [mbYes,
mbCancel], 0) mbCancel], 0)
=mrOk then =mrOk then
begin begin
@ -10316,6 +10316,9 @@ end.
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.710 2004/02/10 00:45:50 mattias
changed mbOk to mbYes for asking to add unit to project
Revision 1.709 2004/02/04 13:40:18 mattias Revision 1.709 2004/02/04 13:40:18 mattias
ShortCutToText now deletes any modifier ShortCutToText now deletes any modifier