Bug 1650: Keywords that link to help page are underlined in generated…

… code on Windows 10 version 1803 https://winscp.net/tracker/1650 (cherry picked from commit 8c45a97) Source commit: 29d6d2658b12c57049fd6d082a5c2483e55c04e4
winscp · May 25, 2018 · 9906fca · 9906fca
1 parent 07e8aa6
commit 9906fca
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 0 deletions.
diff --git a/source/windows/GUITools.cpp b/source/windows/GUITools.cpp
@@ -21,6 +21,7 @@
 #include <Glyphs.h>
 #include <PasTools.hpp>
 #include <VCLCommon.h>
+#include <WinApi.h>
 #include <Vcl.ScreenTips.hpp>
 
 #include "Animations96.h"
@@ -1586,6 +1587,12 @@ void __fastcall TNewRichEdit::CreateParams(TCreateParams & Params)
   CreateSubClass(Params, MSFTEDIT_CLASS);
 }
 //---------------------------------------------------------------------------
+void __fastcall TNewRichEdit::CreateWnd()
+{
+  TRichEdit::CreateWnd();
+  SendMessage(Handle, EM_SETEDITSTYLEEX, 0, SES_EX_HANDLEFRIENDLYURL);
+}
+//---------------------------------------------------------------------------
 void __fastcall TNewRichEdit::DestroyWnd()
 {
   TRichEdit::DestroyWnd();

diff --git a/source/windows/GUITools.h b/source/windows/GUITools.h
@@ -158,6 +158,7 @@ class TNewRichEdit : public TRichEdit
 
 protected:
   virtual void __fastcall CreateParams(TCreateParams & Params);
+  virtual void __fastcall CreateWnd();
   virtual void __fastcall DestroyWnd();
 
 private:

diff --git a/source/windows/WinApi.h b/source/windows/WinApi.h
@@ -188,4 +188,8 @@ class IListView_Win7 : public IOleWindow
 };
 //---------------------------------------------------------------------------
 //---------------------------------------------------------------------------
+#define EM_SETEDITSTYLEEX (WM_USER + 275)
+#define SES_EX_HANDLEFRIENDLYURL (0x100)
+//---------------------------------------------------------------------------
+//---------------------------------------------------------------------------
 #endif  // WinApiH