diff options
Diffstat (limited to 'UQuickConnect.pas')
| -rw-r--r-- | UQuickConnect.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/UQuickConnect.pas b/UQuickConnect.pas index d92e335..aaaa0bf 100644 --- a/UQuickConnect.pas +++ b/UQuickConnect.pas @@ -183,7 +183,7 @@ procedure TFQuickConnect.FormKeyDown(Sender: TObject; Key: Word; Shift: TShiftSt begin case Key of GDK_RETURN, GDK_KP_ENTER: if StopButton.Visible then StopButtonClick(Sender) - else DoConnect; + else if ConnectButton.Enabled then DoConnect; GDK_ESCAPE: begin Accept := False; if StopButton.Visible then StopButtonClick(Sender) |