瀏覽代碼

More explicit "Open Link" for Bug 1930 for 6.0 branch

Source commit: 4dd5d900e0c07c21f2d1e87980288c2a920f3741
Martin Prikryl 4 年之前
父節點
當前提交
0faf11d07d
共有 3 個文件被更改,包括 8 次插入8 次删除
  1. 2 2
      source/forms/Authenticate.cpp
  2. 4 4
      source/forms/Authenticate.dfm
  3. 2 2
      source/forms/Authenticate.h

+ 2 - 2
source/forms/Authenticate.cpp

@@ -704,7 +704,7 @@ void __fastcall TAuthenticateForm::LabelContextPopup(TObject * Sender, const TPo
 {
   TLabel * Label = dynamic_cast<TLabel *>(Sender);
   UnicodeString Url;
-  LabelOpenLinkAction->Visible = ExtractUrl(Label->Caption, Url);
+  LabelOpenLinkAction2->Visible = ExtractUrl(Label->Caption, Url);
   FContextLabel = Label;
   MenuPopup(Sender, MousePos, Handled);
 }
@@ -727,7 +727,7 @@ void TAuthenticateForm::LabelOpen(TLabel * Label)
   }
 }
 //---------------------------------------------------------------------------
-void __fastcall TAuthenticateForm::LabelOpenLinkActionExecute(TObject *)
+void __fastcall TAuthenticateForm::LabelOpenLinkAction2Execute(TObject *)
 {
   if (DebugAlwaysTrue(FContextLabel != NULL))
   {

+ 4 - 4
source/forms/Authenticate.dfm

@@ -301,10 +301,10 @@ object AuthenticateForm: TAuthenticateForm
       Caption = '&Copy'
       OnExecute = LabelCopyActionExecute
     end
-    object LabelOpenLinkAction: TAction
+    object LabelOpenLinkAction2: TAction
       Category = 'Label'
-      Caption = '&Open'
-      OnExecute = LabelOpenLinkActionExecute
+      Caption = '&Open Link'
+      OnExecute = LabelOpenLinkAction2Execute
     end
   end
   object BannerPopupMenu: TPopupMenu
@@ -333,7 +333,7 @@ object AuthenticateForm: TAuthenticateForm
       Caption = '-'
     end
     object Open1: TMenuItem
-      Action = LabelOpenLinkAction
+      Action = LabelOpenLinkAction2
       Default = True
     end
   end

+ 2 - 2
source/forms/Authenticate.h

@@ -55,7 +55,7 @@ __published:
   TPopupMenu *LabelPopupMenu;
   TMenuItem *N2;
   TAction *LabelCopyAction;
-  TAction *LabelOpenLinkAction;
+  TAction *LabelOpenLinkAction2;
   TMenuItem *Open1;
   TMenuItem *Copy1;
   void __fastcall FormShow(TObject *Sender);
@@ -67,7 +67,7 @@ __published:
   void __fastcall BannerMonospacedFontActionExecute(TObject *Sender);
   void __fastcall LogViewMouseMove(TObject *Sender, TShiftState Shift, int X, int Y);
   void __fastcall LabelCopyActionExecute(TObject *Sender);
-  void __fastcall LabelOpenLinkActionExecute(TObject *Sender);
+  void __fastcall LabelOpenLinkAction2Execute(TObject *Sender);
 
 public:
   __fastcall TAuthenticateForm(TComponent * Owner);