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

ide: fixed cancel project options resetting Subtarget

Browse Source
This commit is contained in:
mattias 2024-08-25 12:36:18 +02:00
parent 5f8eab811a
commit ce77f4dfae
4 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
components/jitclasses/demo/JitObjInspectorDemo Executable file
View File

Binary file not shown.

BIN
components/jitclasses/demo/JitObjInspectorDemo.res Normal file
View File

Binary file not shown.

2
ide/frames/compiler_config_target.pas
View File

@ -323,12 +323,14 @@ begin
end;
end;
end;
//debugln(['TCompilerConfigTargetFrame.FillSubTargetComboBox UseSubTarget="',UseSubTarget,'" Candidates=[',sl.Text,']']);
with SubtargetComboBox do begin
Items.BeginUpdate;
Items.Assign(sl);
SetComboBoxText(SubtargetComboBox,UseSubTarget,cstCaseInsensitive);
Items.EndUpdate;
end;
//debugln(['TCompilerConfigTargetFrame.FillSubTargetComboBox SubtargetComboBox: Text="',SubtargetComboBox.Text,'" Index=',SubtargetComboBox.ItemIndex,' Items=[',SubtargetComboBox.Items.Text,']']);
finally
sl.Free;
end;

1
ide/packages/ideconfig/compileroptions.pp
View File

@ -2951,6 +2951,7 @@ begin
fTargetOS := CompOpts.fTargetOS;
fTargetCPU := CompOpts.fTargetCPU;
fTargetProc := CompOpts.fTargetProc;
FSubtarget := CompOpts.FSubtarget;
fOptLevel := CompOpts.fOptLevel;
fVarsInReg := CompOpts.fVarsInReg;
fUncertainOpt := CompOpts.fUncertainOpt;