paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 03:19:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

JCF2: localized Align Settings tab

Browse Source 
git-svn-id: trunk@23999 -
This commit is contained in:
maxim 2010-03-14 22:48:15 +00:00
parent 75952cf1f0
commit c19cb30c5b
2 changed files with 32 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
components/jcf2/IdePlugin/lazarus/jcfuiconsts.pas
View File

@ -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.

19
components/jcf2/Ui/Settings/frClarifyAlign.pas
View File

@ -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;