paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-16 01:49:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: build laz dlg: improved layout

Browse Source 
git-svn-id: trunk@26557 -
This commit is contained in:
mattias 2010-07-09 22:44:12 +00:00
parent 766eea94fc
commit 92c6db6d27
3 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/buildlazdialog.lfm
View File

@ -216,6 +216,7 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
Caption = 'AdvancedBuildOptions'
ClientWidth = 555
ClientHeight = 531
OnResize = AdvancedBuildOptionsPageResize
object OptionsLabel: TLabel
AnchorSideTop.Control = ItemsListBox
AnchorSideTop.Side = asrBottom

7
ide/buildlazdialog.pas
View File

@ -214,6 +214,7 @@ type
AdvancedBuildOptionsPage: TPage;
CBLDBtnPanel: TPanel;
LCLInterfaceRadioGroup: TRadioGroup;
procedure AdvancedBuildOptionsPageResize(Sender: TObject);
procedure AppLCLInterfaceComboBoxChange(Sender: TObject);
procedure CompileButtonClick(Sender: TObject);
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
@ -1183,6 +1184,12 @@ begin
LCLInterfaceRadioGroup.ItemIndex := Combo.ItemIndex;
end;
procedure TConfigureBuildLazarusDlg.AdvancedBuildOptionsPageResize(
Sender: TObject);
begin
ItemListHeader.Width:=AdvancedBuildOptionsPage.ClientWidth div 2;
end;
procedure TConfigureBuildLazarusDlg.CompileButtonClick(Sender: TObject);
begin
Save(Options);

2
ide/lazarusidestrconsts.pas
View File

@ -1703,7 +1703,7 @@ resourcestring
+'functions.';
dlgSearchPaths = 'Paths';
dlgCOParsing = 'Parsing';
dlgCodeGeneration = 'Code';
dlgCodeGeneration = 'Code generation';
dlgCOLinking = 'Linking';
dlgCOVerbosity = 'Verbosity';
dlgCOCfgCmpMessages = 'Messages';