From 42b490a925a3a415a71bc72e6e66f510d4ef352b Mon Sep 17 00:00:00 2001
From: maxim <maxim@lazarus-ide.org>
Date: Fri, 12 Jun 2020 22:28:03 +0000
Subject: [PATCH] IPro: use IDEIntf resource strings for design-time package

git-svn-id: trunk@63351 -
---
 components/turbopower_ipro/design/ipidehtmlcontrol.pas | 10 +++-------
 1 file changed, 3 insertions(+), 7 deletions(-)

diff --git a/components/turbopower_ipro/design/ipidehtmlcontrol.pas b/components/turbopower_ipro/design/ipidehtmlcontrol.pas
index a74fe4cef6..fdbdcebf73 100644
--- a/components/turbopower_ipro/design/ipidehtmlcontrol.pas
+++ b/components/turbopower_ipro/design/ipidehtmlcontrol.pas
@@ -17,7 +17,7 @@ interface
 
 uses
   Classes, SysUtils, LCLProc, Forms, Graphics, Controls, Dialogs, ExtCtrls, Menus,
-  IpMsg, Ipfilebroker, IpHtml, IDEHelpIntf, LazHelpIntf, LazIDEIntf;
+  IpMsg, Ipfilebroker, IpHtml, IDEHelpIntf, LazHelpIntf, LazIDEIntf, ObjInspStrConsts;
 
 type
   TLazIPHtmlControl = class;
@@ -86,10 +86,6 @@ procedure Register;
 
 implementation
 
-resourcestring
-  ipdCopy = '&Copy';
-  ipdSelectAll = 'Select &all';
-
 procedure Register;
 begin
   CreateIDEHTMLControl:=@IPCreateLazIDEHTMLControl;
@@ -142,13 +138,13 @@ begin
   AutoPopup := True;
 
   FCopy := TMenuItem.Create(Owner);
-  FCopy.Caption := ipdCopy;
+  FCopy.Caption := oiStdActEditCopyHeadLine;
   FCopy.ShortCut := ShortCut(ord('C'), [ssCtrl]);
   FCopy.OnClick  := @DoCopy;
   Items.Add(FCopy);
 
   FSelectAll := TMenuItem.Create(Owner);
-  FSelectAll.Caption := ipdSelectAll;
+  FSelectAll.Caption := oiStdActEditSelectAllHeadLine;
   FSelectAll.ShortCut := ShortCut(ord('A'), [ssCtrl]);
   FSelectAll.OnClick   := @DoSelectAll;
   Items.Add(FSelectAll);