|
|
save_as_ok_button.patch (561 bytes)
Index: packages/ide/fpmopts.inc
===================================================================
--- packages/ide/fpmopts.inc (revision 40278)
+++ packages/ide/fpmopts.inc (working copy)
@@ -1588,7 +1588,7 @@
FileName: string;
CanWrite: boolean;
begin
- New(D, Init('*'+ExtOf(INIFileName),dialog_saveoptions,dialog_ini_filename,fdOpenButton,hidSaveIniFile));
+ New(D, Init('*'+ExtOf(INIFileName),dialog_saveoptions,dialog_ini_filename,fdOkButton,hidSaveIniFile));
D^.HelpCtx:=hcSaveAsINI;
if Desktop^.ExecView(D)<>cmCancel then
begin
|
|
|
|
I can not reproduce it. See screenshot. |
|
|
|
|
|
|
|
Not "Save File As" dialog, but "Save Options" dialog. You definitely can reproduce it, because bug is platform irrelevant.
Steps to reproduce:
1. Open fp
2. Press Alt+o and then A |
|
|
|
Indeed. confirmed. Was not clear to me though. |
|
|
|
There is no fdSaveButton equivalent? |
|
|
|
fdSaveButton was my first guess. That does not exist.
It is standart file save dialog and best choice is fdOkButton
TP also use "Ok" button. |
|
|
|
save_as_ok_button_v2.patch (1,092 bytes)
Index: packages/ide/fpide.pas
===================================================================
--- packages/ide/fpide.pas (revision 40278)
+++ packages/ide/fpide.pas (working copy)
@@ -686,7 +686,7 @@
msg_errorsavingconfigfile = 'Error saving config file.';
{Save options dialog.}
- dialog_saveoptions = 'Save Options';
+ dialog_saveoptions = 'Save Options As';
dialog_ini_filename = 'Name of INI file';
{Window list dialog.}
Index: packages/ide/fpmopts.inc
===================================================================
--- packages/ide/fpmopts.inc (revision 40278)
+++ packages/ide/fpmopts.inc (working copy)
@@ -1588,7 +1588,7 @@
FileName: string;
CanWrite: boolean;
begin
- New(D, Init('*'+ExtOf(INIFileName),dialog_saveoptions,dialog_ini_filename,fdOpenButton,hidSaveIniFile));
+ New(D, Init('*'+ExtOf(INIFileName),dialog_saveoptions,dialog_ini_filename,fdOkButton,hidSaveIniFile));
D^.HelpCtx:=hcSaveAsINI;
if Desktop^.ExecView(D)<>cmCancel then
begin
|
|
|
|
Thanks, applied. |
|
|
|
Thanks. |
|
