diff --git a/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas b/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas index 5c54952abe..bd1f01b144 100644 --- a/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas +++ b/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas @@ -230,6 +230,11 @@ resourcestring lisCapsUnitNamesSetCapitalisationOnTheseUnitNames = 'Set capitalisation on ' +'these unit names:'; + //Find and Replace tab + lisFindReplaceFindAndReplace = 'Find and Replace'; + lisFindReplaceEnableFindAndReplace = 'Enable find and replace'; + lisFindReplaceWordList = 'Word list:'; + implementation end. diff --git a/components/jcf2/Ui/Settings/frReplace.pas b/components/jcf2/Ui/Settings/frReplace.pas index e7f0497c07..6f95afa5ad 100644 --- a/components/jcf2/Ui/Settings/frReplace.pas +++ b/components/jcf2/Ui/Settings/frReplace.pas @@ -60,7 +60,7 @@ implementation {$R *.lfm} uses - JcfHelp, JcfSettings; + JcfHelp, JcfSettings, jcfuiconsts; { TfReplace } @@ -72,12 +72,13 @@ end; function TfReplace.GetTitle: String; begin - Result := 'Find and Replace'; + Result := lisFindReplaceFindAndReplace; end; procedure TfReplace.Setup(ADialog: TAbstractOptionsEditorDialog); begin - // + cbEnable.Caption := lisFindReplaceEnableFindAndReplace; + lblWordList.Caption := lisFindReplaceWordList; end; procedure TfReplace.ReadSettings(AOptions: TAbstractIDEOptions);