paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-05 19:20:38 +02:00
Code Issues Packages Projects Releases Wiki Activity

removed procedure TranslateButtonPanel as it is handled by TButtonPanel itself

Browse Source 
git-svn-id: trunk@16998 -
This commit is contained in:
darius 2008-10-15 08:25:10 +00:00
parent 706b297bba
commit 9a5a4f4246
11 changed files with 0 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/buildfiledlg.pas
View File

@ -557,7 +557,6 @@ begin
RunWorkDirGroupbox.Caption:=lisBFWorkingDirectoryLeaveEmptyForFilePath2;
RunCommandGroupbox.Caption:=lisBFRunCommand;
TranslateButtonPanel(ButtonPanel);
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
ButtonPanel.OKButton.OnClick := @OKButtonClick;
end;

1
ide/charactermapdlg.pas
View File

@ -88,7 +88,6 @@ begin
Caption := lisCharacterMap;
CharactersGroupbox.Caption := lisCharacterMap;
TranslateButtonPanel(ButtonPanel);
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
//EnvironmentOptions.IDEWindowLayoutList.Apply(Self, Name);
CharInfoLabel.Caption := '-';

1
ide/checkcompileropts.pas
View File

@ -1113,7 +1113,6 @@ begin
inherited Create(TheOwner);
Application.AddOnIdleHandler(@ApplicationOnIdle,true);
Caption:=dlgCCOCaption;
TranslateButtonPanel(ButtonPanel);
TestGroupbox.Caption:=dlgCCOTest;
OutputGroupBox.Caption:=dlgCCOResults;
CopyOutputMenuItem.Caption:=lisCCOCopyOutputToCliboard;

1
ide/codetemplatesdlg.pas
View File

@ -692,7 +692,6 @@ begin
DeleteButton.Caption:=dlgEdDelete;
TemplatesGroupBox.Caption:=lisCTDTemplates;
TranslateButtonPanel(ButtonPanel);
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
ButtonPanel.OKButton.OnClick := @OKButtonClick;

1
ide/codetoolsoptions.pas
View File

@ -1073,7 +1073,6 @@ begin
SetupSpacePage(4);
SetupIdentifierCompletionPage(5);
TranslateButtonPanel(ButtonPanel);
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
// end;

1
ide/editoroptions.pp
View File

@ -4054,7 +4054,6 @@ end;
procedure TEditorOptionsForm.SetupButtonBar;
begin
TranslateButtonPanel(ButtonPanel);
ButtonPanel.OKButton.OnClick := @OKButtonClick;
ButtonPanel.CancelButton.OnClick := @CancelButtonClick;
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;

1
ide/environmentopts.pp
View File

@ -1723,7 +1723,6 @@ begin
SetupNamingPage(6);
SetupLazDocPage(7);
TranslateButtonPanel(ButtonPanel);
ButtonPanel.OKButton.OnClick := @OKButtonClick;
ButtonPanel.CancelButton.OnClick := @CancelButtonClick;
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;

1
ide/helpoptions.pas
View File

@ -136,7 +136,6 @@ begin
Caption:=lisHlpOptsHelpOptions;
TranslateButtonPanel(ButtonPanel);
ButtonPanel.OKButton.OnClick := @OKButtonClick;
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
ButtonPanel.CancelButton.OnClick := @CancelButtonClick;

2
ide/idecontexthelpedit.pas
View File

@ -154,8 +154,6 @@ begin
NodeNameLabel.Caption:=lisDebugOptionsFrmName;
NodesGroupBox.Caption:=lisHelpEntries;
TranslateButtonPanel(ButtonPanel);
IDEDialogLayoutList.ApplyLayout(Self, 600, 450);
LoadIDEWindowHelp;

1
ide/keymapschemedlg.pas
View File

@ -77,7 +77,6 @@ begin
NoteLabel.Caption:=lisKMNoteAllKeysWillBeSetToTheValuesOfTheChoosenScheme;
SchemeRadiogroup.Caption:=lisKMKeymappingScheme;
TranslateButtonPanel(ButtonPanel);
ButtonPanel.HelpButton.OnClick := @HelpButtonClick;
with SchemeRadiogroup.Items do begin

10
ide/lazarusidestrconsts.pas
View File

@ -3914,16 +3914,6 @@ resourcestring
lisProductName = 'Product Name:';
lisProductVersion = 'Product Version:';
procedure TranslateButtonPanel(ButtonPanel: TButtonPanel);
implementation
procedure TranslateButtonPanel(ButtonPanel: TButtonPanel);
begin
ButtonPanel.OKButton.Caption := lisOkBtn;
ButtonPanel.CancelButton.Caption := dlgCancel;
ButtonPanel.CloseButton.Caption := lisMenuClose;
ButtonPanel.HelpButton.Caption := lisPckEditHelp;
end;
end.