mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 07:59:44 +02:00
IDE: compiler options: hide target OS/CPU, heap size for packages
git-svn-id: trunk@38573 -
This commit is contained in:
parent
f5bc6f0df1
commit
6b12d3b4fc
@ -240,19 +240,19 @@ begin
|
||||
chkChecksStack.Checked := StackChecks;
|
||||
chkVerifyObjMethodCall.Checked := VerifyObjMethodCall;
|
||||
|
||||
grpHeapStackSize.Enabled := NeedsLinkerOpts;
|
||||
grpHeapStackSize.Visible := NeedsLinkerOpts;
|
||||
edtHeapSize.Text := IntToStr(HeapSize);
|
||||
edtStackSize.Text := IntToStr(StackSize);
|
||||
|
||||
if fIsPackage then begin
|
||||
grpTargetPlatform.Enabled:=false;
|
||||
grpTargetPlatform.Visible:=false;
|
||||
TargetOSComboBox.ItemIndex := 0;
|
||||
TargetOSComboBox.Text := 'default';
|
||||
TargetCPUComboBox.ItemIndex := 0;
|
||||
TargetCPUComboBox.Text := 'default';
|
||||
TargetProcessorProcComboBox.Text := 'default';
|
||||
end else begin
|
||||
grpTargetPlatform.Enabled:=true;
|
||||
grpTargetPlatform.Visible:=true;
|
||||
i := TargetOSComboBox.Items.IndexOf(TargetOS);
|
||||
if i < 0 then
|
||||
i := 0; // 0 is default
|
||||
|
Loading…
Reference in New Issue
Block a user