diff options
Diffstat (limited to 'src/gui/gui_dialogs.pas')
| -rw-r--r-- | src/gui/gui_dialogs.pas | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/gui/gui_dialogs.pas b/src/gui/gui_dialogs.pas index 0cad667f..715685d4 100644 --- a/src/gui/gui_dialogs.pas +++ b/src/gui/gui_dialogs.pas @@ -716,8 +716,11 @@ begin if grid.CurrentEntry.EntryType <> etDir then edFileName.Text := grid.CurrentEntry.Name; - - btnOK.Enabled := grid.CurrentEntry.EntryType = etFile; + + if FOpenMode then + btnOK.Enabled := grid.CurrentEntry.EntryType = etFile + else + btnOK.Enabled := edFileName.Text <> ''; lbFileInfo.Text := s; end; |