diff --git a/source/apphelpers.pas b/source/apphelpers.pas
index 651b2419..6ef718ee 100644
--- a/source/apphelpers.pas
+++ b/source/apphelpers.pas
@@ -2393,7 +2393,7 @@ begin
     if Assigned(MainForm) and (MainForm.ActiveConnection <> nil) then
       Dialog.Caption := MainForm.ActiveConnection.Parameters.SessionName + ': ' + Dialog.Caption;
     rx := TRegExpr.Create;
-    rx.Expression := 'https?://\S+';
+    rx.Expression := 'https?://[^\s"]+';
     Dialog.Text := rx.Replace(Msg, '<a href="$0">$0</a>', True);
     rx.Free;