From c19cb30c5bc0238b3dc29e6250ed1a7f929d0336 Mon Sep 17 00:00:00 2001
From: maxim <maxim@lazarus-ide.org>
Date: Sun, 14 Mar 2010 22:48:15 +0000
Subject: [PATCH] JCF2: localized Align Settings tab

git-svn-id: trunk@23999 -
---
 .../jcf2/IdePlugin/lazarus/jcfuiconsts.pas    | 16 ++++++++++++++++
 .../jcf2/Ui/Settings/frClarifyAlign.pas       | 19 ++++++++++++++++---
 2 files changed, 32 insertions(+), 3 deletions(-)

diff --git a/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas b/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas
index 092b716ef2..774a87cf03 100644
--- a/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas
+++ b/components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas
@@ -113,6 +113,22 @@ resourcestring
   lisBLMaxConsecutiveBlankLinesAnywhere = 'Max consecutive blank lines anywhere';
   lisBLLinesBeforeProcedure = 'Lines before procedure';
 
+  //Align tab
+  lisAlignAlign = 'Align';
+  lisAlignInterfaceOnly = 'Interface Only';
+  lisAlignWhatToAlign = 'What to Align';
+  lisAlignAssign = 'Assign';
+  lisAlignConst = 'Const';
+  lisAlignVarDeclarations = 'Var declarations';
+  lisAlignClassAndRecordFields = 'Class and record fields';
+  lisAlignTypeDefs = 'Type defs';
+  lisAlignComments = 'Comments';
+  lisAlignMinColumn = 'Min Column';
+  lisAlignMaxColumn = 'Max Column';
+  lisAlignMaxVariance = 'Max Variance';
+  lisAlignMaxVarianceInterface = 'Max Variance Interface';
+  lisAlignMaxUnaligned = 'Max unaligned';
+
 implementation
 
 end.
diff --git a/components/jcf2/Ui/Settings/frClarifyAlign.pas b/components/jcf2/Ui/Settings/frClarifyAlign.pas
index e1394e7ae7..a81ad079b4 100644
--- a/components/jcf2/Ui/Settings/frClarifyAlign.pas
+++ b/components/jcf2/Ui/Settings/frClarifyAlign.pas
@@ -78,7 +78,7 @@ implementation
 {$R *.lfm}
 
 uses
-  JcfSettings, JcfHelp, SetAlign;
+  JcfSettings, JcfHelp, SetAlign, jcfuiconsts;
 
 constructor TfClarifyAlign.Create(AOwner: TComponent);
 begin
@@ -88,12 +88,25 @@ end;
 
 function TfClarifyAlign.GetTitle: String;
 begin
-  Result := 'Align';
+  Result := lisAlignAlign;
 end;
 
 procedure TfClarifyAlign.Setup(ADialog: TAbstractOptionsEditorDialog);
 begin
-  //
+  cbInterfaceOnly.Caption := lisAlignInterfaceOnly;
+  gbWhat.Caption := lisAlignWhatToAlign;
+  cbAlignAsign.Caption := lisAlignAssign;
+  cbAlignConst.Caption := lisAlignConst;
+  cbAlignVar.Caption := lisAlignVarDeclarations;
+  cbAlignField.Caption := lisAlignClassAndRecordFields;
+  cbAlignTypedef.Caption := lisAlignTypeDefs;
+  cbAlignComment.Caption := lisAlignComments;
+
+  Label5.Caption := lisAlignMinColumn;
+  Label4.Caption := lisAlignMaxColumn;
+  Label6.Caption := lisAlignMaxVariance;
+  Label2.Caption := lisAlignMaxVarianceInterface;
+  Label1.Caption := lisAlignMaxUnaligned;
 end;