jcf, fixed compilation with fpc 2.7.1: don't call abstract methods

git-svn-id: trunk@31967 -
This commit is contained in:
vincents 2011-08-12 21:16:22 +00:00
parent c7a63a2aed
commit 49546fbb0b
6 changed files with 0 additions and 6 deletions

View File

@ -75,7 +75,6 @@ end;
procedure TfrAnyCapsSettings.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
inherited Setup(ADialog);
cbEnableAnyWords.Caption := lisCapsAnyWordEnable;
Label1.Caption := lisCapsAnyWordSetCapitalisationOnTheseWords;
end;

View File

@ -81,7 +81,6 @@ end;
procedure TfClarifyBlocks.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
inherited Setup(ADialog);
Label1.Caption := lisBlocksUseANewLineInBlocksAt;
rgBlockBegin.Caption := lisBlocksBlockWithBegin;
rgBlockBegin.Items[0] := lisCaseBlocksAlways;

View File

@ -72,7 +72,6 @@ end;
procedure TfComments.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
inherited Setup(ADialog);
cbRemoveEmptyDoubleSlashComments.Caption :=
lisCommentsRemoveEmptySlashComments;
cbRemoveEmptyCurlyBraceComments.Caption :=

View File

@ -85,7 +85,6 @@ end;
procedure TfCompilerDirectReturns.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
inherited Setup(ADialog);
Label1.Caption := lisCDUseANewLineBeforeCompilerDirectives;
rgBeforeUses.Caption := lisCDUsesClause;
rgBeforeUses.Items[0] := lisCaseBlocksAlways;

View File

@ -71,7 +71,6 @@ end;
procedure TfrUnitNameCaps.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
inherited Setup(ADialog);
cbEnableAnyWords.Caption := lisCapsAnyWordEnable;
Label1.Caption := lisCapsUnitNamesSetCapitalisationOnTheseUnitNames;
end;

View File

@ -75,7 +75,6 @@ end;
procedure TfWarnings.Setup(ADialog: TAbstractOptionsEditorDialog);
begin
inherited Setup(ADialog);
cbWarningsOn.Caption := lisWarningsWarningsOn;
cbWarnUnusedParams.Caption := lisWarningsWarnAboutUnusedParameters;
Label1.Caption := lisWarningsIgnoreUnusedParametersNamed;