paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-21 09:42:12 +01:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/jcf2/Ui/Settings/frAnyCapsSettings.pas
View File

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

1
components/jcf2/Ui/Settings/frClarifyBlocks.pas
View File

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

1
components/jcf2/Ui/Settings/frComments.pas
View File

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

1
components/jcf2/Ui/Settings/frCompilerDirectReturns.pas
View File

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

1
components/jcf2/Ui/Settings/frUnitCaps.pas
View File

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

1
components/jcf2/Ui/Settings/frWarnings.pas
View File

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