The configure build lazarus IDE provides a lot of options which the
majority of us don't use, but we're however forced to check/uncheck.
Therefore I've added a small Group Box, named "Quick Configure Options"
with thre buttons: All, LCL, and Custom. The first two cover (in my
opinion) the needs of the vast majority of users, while the third one
can be handy.
The "All" Button checks all the Build (or Clean+Build, if Clean All is
checked), the "LCL" button unchecks everything, except LCL (which is set
to Build or Clean+Build as above), while Custom unchecks everything.
If the idea seems good, the attached patch can be applied, or someone
can do it better.
If not, I'll just keep it for me, because I find it handy.
Giuliano
Index: ide/buildlazdialog.pas
===================================================================
--- ide/buildlazdialog.pas (revisione 11586)
+++ ide/buildlazdialog.pas (copia locale)
@@ -175,6 +175,7 @@
CancelButton: TButton;
CleanAllCheckBox: TCheckBox;
ConfirmBuildCheckBox: TCheckBox;
+ BuildOptionsGroupBox: TGroupBox;
ItemListHeader: THeaderControl;
ItemsListBox: TListBox;
LCLInterfaceRadioGroup: TRadioGroup;
@@ -182,6 +183,9 @@
OptionsEdit: TEdit;
OptionsLabel: TLabel;
RestartAfterBuildCheckBox: TCheckBox;
+ BuildAllSpeedButton: TSpeedButton;
+ BuildLCLSpeedButton: TSpeedButton;
+ CustomBuildSpeedButton: TSpeedButton;
TargetCPUComboBox: TComboBox;
TargetCPULabel: TLabel;
TargetDirectoryButton: TButton;
@@ -190,8 +194,12 @@
TargetOSEdit: TEdit;
TargetOSLabel: TLabel;
WithStaticPackagesCheckBox: TCheckBox;
+ procedure BuildLCLSpeedButtonMouseUp(Sender: TObject; Button: TMouseButton;
+ Shift: TShiftState; X, Y: Integer);
procedure CancelButtonClick(Sender: TObject);
procedure CompileButtonClick(Sender: TObject);
+ procedure CustomBuildSpeedButtonMouseUp(Sender: TObject;
+ Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
@@ -204,6 +212,8 @@
Shift: TShiftState; X, Y: Integer);
procedure ItemsListBoxShowHint(Sender: TObject; HintInfo: PHintInfo);
procedure SaveSettingsButtonClick(Sender: TObject);
+ procedure BuildAllSpeedButtonMouseUp(Sender: TObject; Button: TMouseButton;
+ Shift: TShiftState; X, Y: Integer);
procedure TargetDirectoryButtonClick(Sender: TObject);
private
Options: TBuildLazarusOptions;
@@ -837,6 +847,58 @@
ModalResult:=mrOk;
end;
+procedure TConfigureBuildLazarusDlg.BuildAllSpeedButtonMouseUp(Sender: TObject;
+ Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
+var
+ i: Integer;
+ Spb: TSpeedButton;
+ mm: TMakeMode;
+begin
+ Spb := Sender as TSpeedButton;
+ if not Spb.Down then exit;
+ if CleanAllCheckBox.Checked then mm := mmCleanBuild
+ else mm := mmBuild;
+ for i := 0 to OPtions.Count-1 do begin
+ Options.Items[i].MakeMode := mm;
+ end;
+ ItemsListBox.Invalidate;
+end;
+
+procedure TConfigureBuildLazarusDlg.BuildLCLSpeedButtonMouseUp(Sender: TObject;
+ Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
+var
+ i: Integer;
+ Spb: TSpeedButton;
+ mm: TMakeMode;
+begin
+ Spb := Sender as TSpeedButton;
+ if not Spb.Down then exit;
+ if CleanAllCheckBox.Checked then mm := mmCleanBuild
+ else mm := mmBuild;
+ for i := 0 to OPtions.Count-1 do begin
+ If Options.Items[i].Description = 'LCL' then
+ Options.Items[i].MakeMode := mm
+ else
+ Options.Items[i].MakeMode := mmNone;
+ end;
+ ItemsListBox.Invalidate;
+
+end;
+
+procedure TConfigureBuildLazarusDlg.CustomBuildSpeedButtonMouseUp(
+ Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
+var
+ i: Integer;
+ Spb: TSpeedButton;
+begin
+ Spb := Sender as TSpeedButton;
+ if not Spb.Down then exit;
+ for i := 0 to OPtions.Count-1 do begin
+ Options.Items[i].MakeMode := mmNone;
+ end;
+ ItemsListBox.Invalidate;
+end;
+
procedure TConfigureBuildLazarusDlg.TargetDirectoryButtonClick(Sender:
TObject);
var
AFilename: String;
Index: ide/buildlazdialog.lrs
===================================================================
--- ide/buildlazdialog.lrs (revisione 11586)
+++ ide/buildlazdialog.lrs (copia locale)
@@ -10,109 +10,120 @@
+'lose'#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#8'Positio'
+'n'#7#14'poScreenCenter'#0#6'TLabel'#12'OptionsLabel'#22'AnchorSideLeft.Cont'
+'rol'#7#12'ItemsListBox'#21'AnchorSideTop.Control'#7#12'ItemsListBox'#18'Anc'
- +'horSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#14#3'Top'#3#26#1#5
-
+'Width'#2'*'#17'BorderSpacing.Top'#2#18#7'Caption'#6#8'Options:'#5'Color'#7#6
-
+'clNone'#11'ParentColor'#8#0#0#6'TLabel'#13'TargetOSLabel'#22'AnchorSideLeft'
- +'.Control'#7#12'OptionsLabel'#21'AnchorSideTop.Control'#7#12'TargetOSEdit'#4
-
+'Left'#2#6#6'Height'#2#14#3'Top'#3'6'#1#5'Width'#2'6'#7'Caption'#6#10'Target'
- +'
OS:'#5'Color'#7#6'clNone'#11'ParentColor'#8#0#0#6'TLabel'#20'TargetDirecto'
-
+'ryLabel'#22'AnchorSideLeft.Control'#7#13'TargetOSLabel'#21'AnchorSideTop.Co'
- +'ntrol'#7#23'TargetDirectoryComboBox'#4'Left'#2#6#6'Height'#2#14#3'Top'#3'R'
- +#1#5'Width'#2'T'#7'Caption'#6#17'Target Directory:'#5'Color'#7#6'clNone'#11
-
+'ParentColor'#8#0#0#6'TLabel'#14'TargetCPULabel'#22'AnchorSideLeft.Control'#7
-
+#20'TargetDirectoryLabel'#21'AnchorSideTop.Control'#7#17'TargetCPUComboBox'#4
-
+'Left'#2#6#6'Height'#2#14#3'Top'#3'm'#1#5'Width'#2'8'#7'Caption'#6#10'Target'
- +'
CPU'#5'Color'#7#6'clNone'#11'ParentColor'#8#0#0#9'TCheckBox'#16'CleanAllCh'
-
+'eckBox'#22'AnchorSideLeft.Control'#7#22'LCLInterfaceRadioGroup'#21'AnchorSi'
-
+'deTop.Control'#7#22'LCLInterfaceRadioGroup'#18'AnchorSideTop.Side'#7#9'asrB'
-
+'ottom'#24'AnchorSideBottom.Control'#7#26'WithStaticPackagesCheckBox'#4'Left'
-
+#3'@'#1#6'Height'#2#13#3'Top'#3#232#0#5'Width'#2'='#7'Anchors'#11#6'akLeft'#8
-
+'akBottom'#0#17'BorderSpacing.Top'#2#18#20'BorderSpacing.Bottom'#2#6#7'Capti'
- +'on'#6#9'Clean
All'#8'TabOrder'#2#0#0#0#5'TEdit'#11'OptionsEdit'#21'AnchorSi'
- +'deTop.Control'#7#12'OptionsLabel'#23'AnchorSideRight.Control'#7#5'Owner'#20
-
+'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#156#0#6'Height'#2#22#3'Top'#3
-
+#26#1#5'Width'#3'C'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#19'Borde'
-
+'rSpacing.Right'#2#6#8'TabOrder'#2#4#0#0#5'TEdit'#12'TargetOSEdit'#21'Anchor'
- +'SideTop.Control'#7#11'OptionsEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
- +'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'
-
+#4'Left'#3#156#0#6'Height'#2#22#3'Top'#3'6'#1#5'Width'#3'C'#1#7'Anchors'#11#5
-
+'akTop'#6'akLeft'#7'akRight'#0#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#5#0
- +#0#9'TComboBox'#23'TargetDirectoryComboBox'#22'AnchorSideLeft.Control'#7#12
-
+'TargetOSEdit'#21'AnchorSideTop.Control'#7#12'TargetOSEdit'#18'AnchorSideTop'
-
+'.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#21'TargetDirectoryButto'
- +'n'#4'Left'#3#156#0#6'Height'#2#21#3'Top'#3'R'#1#5'Width'#3''''#1#7'Anchors'
-
+#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLin'
-
+'eComplete'#20'cbactSearchAscending'#0#10'ItemHeight'#2#13#9'MaxLength'#2#0#8
-
+'TabOrder'#2#6#0#0#7'TButton'#21'TargetDirectoryButton'#21'AnchorSideTop.Con'
-
+'trol'#7#12'TargetOSEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSid'
-
+'eRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'Ancho'
-
+'rSideBottom.Control'#7#23'TargetDirectoryComboBox'#21'AnchorSideBottom.Side'
- +#7#9'asrBottom'#4'Left'#3#201#1#6'Height'#2#21#3'Top'#3'R'#1#5'Width'#2#22#7
- +'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#19
-
+'BorderSpacing.Right'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#3'.'
-
+'..'#7'OnClick'#7#26'TargetDirectoryButtonClick'#8'TabOrder'#2#7#0#0#11'TRad'
-
+'ioGroup'#22'LCLInterfaceRadioGroup'#22'AnchorSideLeft.Control'#7#14'ItemLis'
- +'tHeader'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7
-
+#5'Owner'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9
- +'asrBottom'#24'AnchorSideBottom.Control'#7#16'CleanAllCheckBox'#4'Left'#3'@'
-
+#1#6'Height'#3#208#0#3'Top'#2#6#5'Width'#3#159#0#7'Anchors'#11#5'akTop'#7'ak'
-
+'Right'#8'akBottom'#0#8'AutoFill'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6
-
+#22'LCLInterfaceRadioGroup'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSiz'
-
+'ing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogen'
-
+'ousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResi'
-
+'ze'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.Sh'
-
+'rinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRig'
-
+'htThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#8'TabOrder'#2#2#0#0#9
-
+'TCheckBox'#26'WithStaticPackagesCheckBox'#22'AnchorSideLeft.Control'#7#22'L'
- +'CLInterfaceRadioGroup'#21'AnchorSideTop.Control'#7#16'CleanAllCheckBox'#18
-
,'AnchorSideTop.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#12'ItemsL'
- +'istBox'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'@'#1#6'Height'#2
- +#13#3'Top'#3#251#0#5'Width'#3#166#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#17
-
+'BorderSpacing.Top'#2#6#7'Caption'#6#26'WithStaticPackagesCheckBox'#8'TabOrd'
-
+'er'#2#3#0#0#9'TCheckBox'#25'RestartAfterBuildCheckBox'#22'AnchorSideLeft.Co'
-
+'ntrol'#7#14'TargetCPULabel'#21'AnchorSideTop.Control'#7#17'TargetCPUComboBo'
-
+'x'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#13#3'Top'#3
-
+#148#1#5'Width'#3#148#0#17'BorderSpacing.Top'#2#18#7'Caption'#6#25'RestartAf'
- +'terBuildCheckBox'#8'TabOrder'#2#9#0#0#9'TCheckBox'#20'ConfirmBuildCheckBox'
-
+#22'AnchorSideLeft.Control'#7#25'RestartAfterBuildCheckBox'#21'AnchorSideTop'
-
+'.Control'#7#25'RestartAfterBuildCheckBox'#18'AnchorSideTop.Side'#7#9'asrBot'
-
+'tom'#4'Left'#2#6#6'Height'#2#13#3'Top'#3#167#1#5'Width'#2''#17'BorderSpaci'
-
+'ng.Top'#2#6#7'Caption'#6#20'ConfirmBuildCheckBox'#8'TabOrder'#2#10#0#0#7'TB'
-
+'utton'#18'SaveSettingsButton'#23'AnchorSideRight.Control'#7#12'CancelButton'
- +#24'AnchorSideBottom.Control'#7#12'CancelButton'#21'AnchorSideBottom.Side'#7
-
+#9'asrBottom'#4'Left'#3'4'#1#6'Height'#2#25#3'Top'#3#193#1#5'Width'#2'\'#7'A'
- +'nchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2
- +#18#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#13'Save
settings'#7'Defau'
-
+'lt'#9#7'OnClick'#7#23'SaveSettingsButtonClick'#8'TabOrder'#2#11#0#0#7'TButt'
-
+'on'#12'CancelButton'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRi'
-
+'ght.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorS'
-
+'ideBottom.Side'#7#9'asrBottom'#4'Left'#3#162#1#6'Height'#2#25#3'Top'#3#193#1
-
+#5'Width'#2'='#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'Borde'
-
+'rSpacing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#4#6'Cancel'#9#7'Captio'
-
+'n'#6#6'Cancel'#7'OnClick'#7#17'CancelButtonClick'#8'TabOrder'#2#12#0#0#8'TL'
-
+'istBox'#12'ItemsListBox'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSid'
- +'eTop.Control'#7#14'ItemListHeader'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
- +'AnchorSideRight.Control'#7#14'ItemListHeader'#20'AnchorSideRight.Side'#7#9
-
+'asrBottom'#4'Left'#2#6#6'Height'#3#234#0#3'Top'#2#30#5'Width'#3'4'#1#7'Anch'
-
+'ors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2
-
+#6#10'ItemHeight'#2#25#10'OnDrawItem'#7#20'ItemsListBoxDrawItem'#11'OnMouseD'
- +'own'#7#21'ItemsListBoxMouseDown'#10'OnShowHint'#7#20'ItemsListBoxShowHint'
-
+#14'ParentShowHint'#8#8'ShowHint'#9#5'Style'#7#16'lbOwnerDrawFixed'#8'TabOrd'
- +'er'#2#1#0#0#9'TComboBox'#17'TargetCPUComboBox'#22'AnchorSideLeft.Control'#7
-
+#23'TargetDirectoryComboBox'#21'AnchorSideTop.Control'#7#23'TargetDirectoryC'
-
+'omboBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7
- +#23'TargetDirectoryComboBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'
-
+#3#156#0#6'Height'#2#21#3'Top'#3'm'#1#5'Width'#3''''#1#7'Anchors'#11#5'akTop'
-
+#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20
-
+'cbactSearchAscending'#0#17'BorderSpacing.Top'#2#6#10'ItemHeight'#2#13#9'Max'
-
+'Length'#2#0#8'TabOrder'#2#8#0#0#7'TButton'#13'CompileButton'#23'AnchorSideR'
-
+'ight.Control'#7#18'SaveSettingsButton'#24'AnchorSideBottom.Control'#7#18'Sa'
-
+'veSettingsButton'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#225#0#6
-
+'Height'#2#25#3'Top'#3#193#1#5'Width'#2'A'#7'Anchors'#11#7'akRight'#8'akBott'
-
+'om'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#18#25'BorderSpacing.InnerBord'
-
+'er'#2#4#7'Caption'#6#7'Compile'#7'OnClick'#7#18'CompileButtonClick'#8'TabOr'
- +'der'#2#13#0#0#14'THeaderControl'#14'ItemListHeader'#4'Left'#2#6#6'Height'#2
-
+#24#3'Top'#2#6#5'Width'#3'4'#1#8'Sections'#14#0#14'OnSectionClick'#7#26'Item'
-
+'ListHeaderSectionClick'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'OnR'
- +'esize'#7#20'ItemListHeaderResize'#0#0#0
+ +'horSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#13#3'Top'#3#28#1#5
+
+'Width'#2'/'#17'BorderSpacing.Top'#2#18#7'Caption'#6#8'Options:'#11'ParentCo'
+
+'lor'#8#0#0#6'TLabel'#13'TargetOSLabel'#22'AnchorSideLeft.Control'#7#12'Opti'
+
+'onsLabel'#21'AnchorSideTop.Control'#7#12'TargetOSEdit'#4'Left'#2#6#6'Height'
+ +#2#13#3'Top'#3'8'#1#5'Width'#2'='#7'Caption'#6#10'Target
OS:'#11'ParentColor'
+
+#8#0#0#6'TLabel'#20'TargetDirectoryLabel'#22'AnchorSideLeft.Control'#7#13'Ta'
+
+'rgetOSLabel'#21'AnchorSideTop.Control'#7#23'TargetDirectoryComboBox'#4'Left'
+ +#2#6#6'Height'#2#13#3'Top'#3'T'#1#5'Width'#2'^'#7'Caption'#6#17'Target
Direc'
+
+'tory:'#11'ParentColor'#8#0#0#6'TLabel'#14'TargetCPULabel'#22'AnchorSideLeft'
+
+'.Control'#7#20'TargetDirectoryLabel'#21'AnchorSideTop.Control'#7#17'TargetC'
+
+'PUComboBox'#4'Left'#2#6#6'Height'#2#13#3'Top'#3'o'#1#5'Width'#2'A'#7'Captio'
+ +'n'#6#10'Target CPU'#11'ParentColor'#8#0#0#9'TCheckBox'#16'CleanAllCheckBox'
+
+#22'AnchorSideLeft.Control'#7#22'LCLInterfaceRadioGroup'#21'AnchorSideTop.Co'
+
+'ntrol'#7#22'LCLInterfaceRadioGroup'#18'AnchorSideTop.Side'#7#9'asrBottom'#24
+ +'AnchorSideBottom.Control'#7#26'WithStaticPackagesCheckBox'#4'Left'#3'@'#1#6
+
+'Height'#2#20#3'Top'#3#220#0#5'Width'#2'O'#7'Anchors'#11#6'akLeft'#8'akBotto'
+ +'m'#0#17'BorderSpacing.Top'#2#18#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#9
+ +'Clean
All'#8'TabOrder'#2#0#0#0#5'TEdit'#11'OptionsEdit'#21'AnchorSideTop.Co'
+
+'ntrol'#7#12'OptionsLabel'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorS'
+
+'ideRight.Side'#7#9'asrBottom'#4'Left'#3#156#0#6'Height'#2#22#3'Top'#3#28#1#5
+
+'Width'#3'C'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#19'BorderSpacin'
+
+'g.Right'#2#6#8'TabOrder'#2#4#0#0#5'TEdit'#12'TargetOSEdit'#21'AnchorSideTop'
+
+'.Control'#7#11'OptionsEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'Anchor'
+
+'SideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Lef'
+
+'t'#3#156#0#6'Height'#2#22#3'Top'#3'8'#1#5'Width'#3'C'#1#7'Anchors'#11#5'akT'
+ +'op'#6'akLeft'#7'akRight'#0#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#5#0#0
+
+#9'TComboBox'#23'TargetDirectoryComboBox'#22'AnchorSideLeft.Control'#7#12'Ta'
+
+'rgetOSEdit'#21'AnchorSideTop.Control'#7#12'TargetOSEdit'#18'AnchorSideTop.S'
+ +'ide'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#21'TargetDirectoryButton'
+ +#4'Left'#3#156#0#6'Height'#2#21#3'Top'#3'T'#1#5'Width'#3''''#1#7'Anchors'#11
+
+#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineCo'
+
+'mplete'#20'cbactSearchAscending'#0#9'MaxLength'#2#0#8'TabOrder'#2#6#0#0#7'T'
+
+'Button'#21'TargetDirectoryButton'#21'AnchorSideTop.Control'#7#12'TargetOSEd'
+
+'it'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#5'O'
+
+'wner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7
+
+#23'TargetDirectoryComboBox'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'
+ +#3#201#1#6'Height'#2#21#3'Top'#3'T'#1#5'Width'#2#22#7'Anchors'#11#5'akTop'#7
+ +'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#19'BorderSpacing.Right'#2
+
+#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#3'...'#7'OnClick'#7#26'Tar'
+
+'getDirectoryButtonClick'#8'TabOrder'#2#7#0#0#11'TRadioGroup'#22'LCLInterfac'
+
+'eRadioGroup'#22'AnchorSideLeft.Control'#7#14'ItemListHeader'#19'AnchorSideL'
+
+'eft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSide'
+
+'Right.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'Anchor'
+ +'SideBottom.Control'#7#16'CleanAllCheckBox'#4'Left'#3'@'#1#6'Height'#3#196#0
+ +#3'Top'#2#6#5'Width'#3#159#0#7'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0
+
+#8'AutoFill'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#22'LCLInterfaceRadi'
+
+'oGroup'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacin'
+ +'g'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27
+
+'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.'
+ +'ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14
+ +'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'
+
+#27'ChildSizing.ControlsPerLine'#2#1#8'TabOrder'#2#2#0#0#9'TCheckBox'#26'Wit'
+
+'hStaticPackagesCheckBox'#22'AnchorSideLeft.Control'#7#22'LCLInterfaceRadioG'
+
+'roup'#21'AnchorSideTop.Control'#7#16'CleanAllCheckBox'#18'AnchorSideTop.Sid'
+
+'e'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#12'ItemsListBox'#21'Anchor'
+
,'SideBottom.Side'#7#9'asrBottom'#4'Left'#3'@'#1#6'Height'#2#20#3'Top'#3#246#0
+
+#5'Width'#3#194#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#17'BorderSpacing.Top'
+
+#2#6#7'Caption'#6#26'WithStaticPackagesCheckBox'#8'TabOrder'#2#3#0#0#9'TChec'
+
+'kBox'#25'RestartAfterBuildCheckBox'#22'AnchorSideLeft.Control'#7#14'TargetC'
+
+'PULabel'#21'AnchorSideTop.Control'#7#17'TargetCPUComboBox'#18'AnchorSideTop'
+ +'.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#20#3'Top'#3#150#1#5'Width'#3
+ +#176#0#17'BorderSpacing.Top'#2#18#7'Caption'#6#25'RestartAfterBuildCheckBox'
+
+#8'TabOrder'#2#9#0#0#9'TCheckBox'#20'ConfirmBuildCheckBox'#22'AnchorSideLeft'
+
+'.Control'#7#25'RestartAfterBuildCheckBox'#21'AnchorSideTop.Control'#7#25'Re'
+
+'startAfterBuildCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6
+
+'Height'#2#20#3'Top'#3#176#1#5'Width'#3#154#0#17'BorderSpacing.Top'#2#6#7'Ca'
+
+'ption'#6#20'ConfirmBuildCheckBox'#8'TabOrder'#2#10#0#0#7'TButton'#18'SaveSe'
+
+'ttingsButton'#23'AnchorSideRight.Control'#7#12'CancelButton'#24'AnchorSideB'
+
+'ottom.Control'#7#12'CancelButton'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
+
+'Left'#3'>'#1#6'Height'#2#26#3'Top'#3#192#1#5'Width'#2'Y'#7'Anchors'#11#7'ak'
+
+'Right'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#18#25'BorderSp'
+ +'acing.InnerBorder'#2#4#7'Caption'#6#13'Save
settings'#7'Default'#9#7'OnClic'
+
+'k'#7#23'SaveSettingsButtonClick'#8'TabOrder'#2#11#0#0#7'TButton'#12'CancelB'
+ +'utton'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9
+
+'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideBottom.Side'
+
+#7#9'asrBottom'#4'Left'#3#169#1#6'Height'#2#26#3'Top'#3#192#1#5'Width'#2'6'#7
+ +'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'
+ +#2#6#25'BorderSpacing.InnerBorder'#2#4#6'Cancel'#9#7'Caption'#6#6'Cancel'#7
+
+'OnClick'#7#17'CancelButtonClick'#8'TabOrder'#2#12#0#0#8'TListBox'#12'ItemsL'
+
+'istBox'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#14
+
+'ItemListHeader'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Co'
+ +'ntrol'#7#14'ItemListHeader'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'
+ +#2#6#6'Height'#3#236#0#3'Top'#2#30#5'Width'#3'4'#1#7'Anchors'#11#5'akTop'#6
+
+'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#10'ItemHeight'#2
+
+#25#10'OnDrawItem'#7#20'ItemsListBoxDrawItem'#11'OnMouseDown'#7#21'ItemsList'
+
+'BoxMouseDown'#10'OnShowHint'#7#20'ItemsListBoxShowHint'#14'ParentShowHint'#8
+ +#8'ShowHint'#9#5'Style'#7#16'lbOwnerDrawFixed'#8'TabOrder'#2#1#8'TopIndex'#2
+ +#255#0#0#9'TComboBox'#17'TargetCPUComboBox'#22'AnchorSideLeft.Control'#7#23
+
+'TargetDirectoryComboBox'#21'AnchorSideTop.Control'#7#23'TargetDirectoryComb'
+
+'oBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#23
+ +'TargetDirectoryComboBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3
+
+#156#0#6'Height'#2#21#3'Top'#3'o'#1#5'Width'#3''''#1#7'Anchors'#11#5'akTop'#6
+ +'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20
+
+'cbactSearchAscending'#0#17'BorderSpacing.Top'#2#6#9'MaxLength'#2#0#8'TabOrd'
+
+'er'#2#8#0#0#7'TButton'#13'CompileButton'#23'AnchorSideRight.Control'#7#18'S'
+ +'aveSettingsButton'#24'AnchorSideBottom.Control'#7#18'SaveSettingsButton'#21
+ +'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#241#0#6'Height'#2#26#3'Top'
+ +#3#192#1#5'Width'#2';'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9
+ +#19'BorderSpacing.Right'#2#18#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6
+
+#7'Compile'#7'OnClick'#7#18'CompileButtonClick'#8'TabOrder'#2#13#0#0#14'THea'
+
+'derControl'#14'ItemListHeader'#4'Left'#2#6#6'Height'#2#24#3'Top'#2#6#5'Widt'
+
+'h'#3'4'#1#8'Sections'#14#0#14'OnSectionClick'#7#26'ItemListHeaderSectionCli'
+
+'ck'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'OnResize'#7#20'ItemList'
+
+'HeaderResize'#0#0#9'TGroupBox'#20'BuildOptionsGroupBox'#4'Left'#3#192#0#6'H'
+
+'eight'#2'2'#3'Top'#3#136#1#5'Width'#3#24#1#7'Anchors'#11#7'akRight'#8'akBot'
+ +'tom'#0#7'Caption'#6#19'Quick Build
Options'#12'ClientHeight'#2'!'#11'Client'
+ +'Width'#3#20#1#8'TabOrder'#2#14#0#12'TSpeedButton'#19'BuildAllSpeedButton'#4
+
+'Left'#2'&'#6'Height'#2#22#3'Top'#2#5#5'Width'#2'2'#7'Caption'#6#3'All'#5'Co'
+
+'lor'#7#9'clBtnFace'#10'GroupIndex'#2#1#9'NumGlyphs'#2#0#9'OnMouseUp'#7#26'B'
+
+'uildAllSpeedButtonMouseUp'#0#0#12'TSpeedButton'#19'BuildLCLSpeedButton'#4'L'
+
+'eft'#2'x'#6'Height'#2#22#3'Top'#2#5#5'Width'#2'2'#7'Caption'#6#3'LCL'#5'Col'
+
+'or'#7#9'clBtnFace'#10'GroupIndex'#2#1#9'NumGlyphs'#2#0#9'OnMouseUp'#7#26'Bu'
+ +'ildLCLSpeedButtonMouseUp'#0#0#12'TSpeedButton'#22'CustomBuildSpeedButton'#4
+
+'Left'#3#192#0#6'Height'#2#22#3'Top'#2#5#5'Width'#2'2'#7'Caption'#6#6'Custom'
+ +#5'Color'#7#9'clBtnFace'#10'GroupIndex'#2#1#9'NumGlyphs'#2#0#9'OnMouseUp'#7
+ +#29'CustomBuildSpeedButtonMouseUp'#0#0#0#0
]);
Index: ide/buildlazdialog.lfm
===================================================================
--- ide/buildlazdialog.lfm (revisione 11586)
+++ ide/buildlazdialog.lfm (copia locale)
@@ -21,45 +21,41 @@
AnchorSideTop.Control = ItemsListBox
AnchorSideTop.Side = asrBottom
Left = 6
- Height = 14
- Top = 282
- Width = 42
+ Height = 13
+ Top = 284
+ Width = 47
BorderSpacing.Top = 18
Caption = 'Options:'
- Color = clNone
ParentColor = False
end
object TargetOSLabel: TLabel
AnchorSideLeft.Control = OptionsLabel
AnchorSideTop.Control = TargetOSEdit
Left = 6
- Height = 14
- Top = 310
- Width = 54
+ Height = 13
+ Top = 312
+ Width = 61
Caption = 'Target OS:'
- Color = clNone
ParentColor = False
end
object TargetDirectoryLabel: TLabel
AnchorSideLeft.Control = TargetOSLabel
AnchorSideTop.Control = TargetDirectoryComboBox
Left = 6
- Height = 14
- Top = 338
- Width = 84
+ Height = 13
+ Top = 340
+ Width = 94
Caption = 'Target Directory:'
- Color = clNone
ParentColor = False
end
object TargetCPULabel: TLabel
AnchorSideLeft.Control = TargetDirectoryLabel
AnchorSideTop.Control = TargetCPUComboBox
Left = 6
- Height = 14
- Top = 365
- Width = 56
+ Height = 13
+ Top = 367
+ Width = 65
Caption = 'Target CPU'
- Color = clNone
ParentColor = False
end
object CleanAllCheckBox: TCheckBox
@@ -68,9 +64,9 @@
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Control = WithStaticPackagesCheckBox
Left = 320
- Height = 13
- Top = 232
- Width = 61
+ Height = 20
+ Top = 220
+ Width = 79
Anchors = [akLeft, akBottom]
BorderSpacing.Top = 18
BorderSpacing.Bottom = 6
@@ -83,7 +79,7 @@
AnchorSideRight.Side = asrBottom
Left = 156
Height = 22
- Top = 282
+ Top = 284
Width = 323
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 6
@@ -96,7 +92,7 @@
AnchorSideRight.Side = asrBottom
Left = 156
Height = 22
- Top = 310
+ Top = 312
Width = 323
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
@@ -109,11 +105,10 @@
AnchorSideRight.Control = TargetDirectoryButton
Left = 156
Height = 21
- Top = 338
+ Top = 340
Width = 295
Anchors = [akTop, akLeft, akRight]
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
- ItemHeight = 13
MaxLength = 0
TabOrder = 6
end
@@ -126,7 +121,7 @@
AnchorSideBottom.Side = asrBottom
Left = 457
Height = 21
- Top = 338
+ Top = 340
Width = 22
Anchors = [akTop, akRight, akBottom]
BorderSpacing.Left = 6
@@ -144,7 +139,7 @@
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = CleanAllCheckBox
Left = 320
- Height = 208
+ Height = 196
Top = 6
Width = 159
Anchors = [akTop, akRight, akBottom]
@@ -168,9 +163,9 @@
AnchorSideBottom.Control = ItemsListBox
AnchorSideBottom.Side = asrBottom
Left = 320
- Height = 13
- Top = 251
- Width = 166
+ Height = 20
+ Top = 246
+ Width = 194
Anchors = [akLeft, akBottom]
BorderSpacing.Top = 6
Caption = 'WithStaticPackagesCheckBox'
@@ -181,9 +176,9 @@
AnchorSideTop.Control = TargetCPUComboBox
AnchorSideTop.Side = asrBottom
Left = 6
- Height = 13
- Top = 404
- Width = 148
+ Height = 20
+ Top = 406
+ Width = 176
BorderSpacing.Top = 18
Caption = 'RestartAfterBuildCheckBox'
TabOrder = 9
@@ -193,9 +188,9 @@
AnchorSideTop.Control = RestartAfterBuildCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
- Height = 13
- Top = 423
- Width = 127
+ Height = 20
+ Top = 432
+ Width = 154
BorderSpacing.Top = 6
Caption = 'ConfirmBuildCheckBox'
TabOrder = 10
@@ -204,10 +199,10 @@
AnchorSideRight.Control = CancelButton
AnchorSideBottom.Control = CancelButton
AnchorSideBottom.Side = asrBottom
- Left = 308
- Height = 25
- Top = 449
- Width = 92
+ Left = 318
+ Height = 26
+ Top = 448
+ Width = 89
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 18
@@ -222,10 +217,10 @@
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
- Left = 418
- Height = 25
- Top = 449
- Width = 61
+ Left = 425
+ Height = 26
+ Top = 448
+ Width = 54
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
@@ -242,7 +237,7 @@
AnchorSideRight.Control = ItemListHeader
AnchorSideRight.Side = asrBottom
Left = 6
- Height = 234
+ Height = 236
Top = 30
Width = 308
Anchors = [akTop, akLeft, akRight, akBottom]
@@ -255,6 +250,7 @@
ShowHint = True
Style = lbOwnerDrawFixed
TabOrder = 1
+ TopIndex = -1
end
object TargetCPUComboBox: TComboBox
AnchorSideLeft.Control = TargetDirectoryComboBox
@@ -264,12 +260,11 @@
AnchorSideRight.Side = asrBottom
Left = 156
Height = 21
- Top = 365
+ Top = 367
Width = 295
Anchors = [akTop, akLeft, akRight]
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
BorderSpacing.Top = 6
- ItemHeight = 13
MaxLength = 0
TabOrder = 8
end
@@ -277,10 +272,10 @@
AnchorSideRight.Control = SaveSettingsButton
AnchorSideBottom.Control = SaveSettingsButton
AnchorSideBottom.Side = asrBottom
- Left = 225
- Height = 25
- Top = 449
- Width = 65
+ Left = 241
+ Height = 26
+ Top = 448
+ Width = 59
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 18
@@ -299,4 +294,48 @@
Anchors = [akTop, akLeft, akRight]
OnResize = ItemListHeaderResize
end
+ object BuildOptionsGroupBox: TGroupBox
+ Left = 192
+ Height = 50
+ Top = 392
+ Width = 280
+ Anchors = [akRight, akBottom]
+ Caption = 'Quick Build Options'
+ ClientHeight = 33
+ ClientWidth = 276
+ TabOrder = 14
+ object BuildAllSpeedButton: TSpeedButton
+ Left = 38
+ Height = 22
+ Top = 5
+ Width = 50
+ Caption = 'All'
+ Color = clBtnFace
+ GroupIndex = 1
+ NumGlyphs = 0
+ OnMouseUp = BuildAllSpeedButtonMouseUp
+ end
+ object BuildLCLSpeedButton: TSpeedButton
+ Left = 120
+ Height = 22
+ Top = 5
+ Width = 50
+ Caption = 'LCL'
+ Color = clBtnFace
+ GroupIndex = 1
+ NumGlyphs = 0
+ OnMouseUp = BuildLCLSpeedButtonMouseUp
+ end
+ object CustomBuildSpeedButton: TSpeedButton
+ Left = 192
+ Height = 22
+ Top = 5
+ Width = 50
+ Caption = 'Custom'
+ Color = clBtnFace
+ GroupIndex = 1
+ NumGlyphs = 0
+ OnMouseUp = CustomBuildSpeedButtonMouseUp
+ end
+ end
end
