mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-30 19:43:39 +02:00
JCF2: localized Comments tab
git-svn-id: trunk@24372 -
This commit is contained in:
parent
201ab0682a
commit
56bbb57b31
@ -190,6 +190,10 @@ resourcestring
|
||||
lisCDUseANewLineAfterCompilerDirectives = 'Use a new line after compiler '
|
||||
+'directives:';
|
||||
|
||||
//Comments tab
|
||||
lisCommentsRemoveEmptySlashComments = 'Remove empty ''//'' comments';
|
||||
lisCommentsRemoveEmptyCurlyBracesComments = 'Remove empty ''{ }'' comments';
|
||||
|
||||
implementation
|
||||
|
||||
end.
|
||||
|
@ -57,7 +57,7 @@ implementation
|
||||
{$R *.lfm}
|
||||
|
||||
uses
|
||||
JcfHelp, JcfSettings, SetComments;
|
||||
JcfHelp, JcfSettings, SetComments, jcfuiconsts;
|
||||
|
||||
constructor TfComments.Create(AOwner: TComponent);
|
||||
begin
|
||||
@ -67,12 +67,16 @@ end;
|
||||
|
||||
function TfComments.GetTitle: String;
|
||||
begin
|
||||
Result := 'Comments';
|
||||
Result := lisAlignComments;
|
||||
end;
|
||||
|
||||
procedure TfComments.Setup(ADialog: TAbstractOptionsEditorDialog);
|
||||
begin
|
||||
inherited Setup(ADialog);
|
||||
cbRemoveEmptyDoubleSlashComments.Caption :=
|
||||
lisCommentsRemoveEmptySlashComments;
|
||||
cbRemoveEmptyCurlyBraceComments.Caption :=
|
||||
lisCommentsRemoveEmptyCurlyBracesComments;
|
||||
end;
|
||||
|
||||
procedure TfComments.ReadSettings(AOptions: TAbstractIDEOptions);
|
||||
|
Loading…
Reference in New Issue
Block a user