paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 18:03:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Show (default) text also in TargetOS and TargetCPU option controls for consistency.

Browse Source 
git-svn-id: trunk@42038 -
This commit is contained in:
juha 2013-07-09 18:54:50 +00:00
parent 7978db505c
commit 664d9707a1
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ide/frames/compiler_config_target.pas
View File

@ -344,16 +344,17 @@ begin
TargetProcessorProcComboBox.Text := 'default';
end else begin
grpTargetPlatform.Visible:=true;
// Target OS
i := TargetOSComboBox.Items.IndexOf(TargetOS);
if i < 0 then
i := 0; // 0 is default
TargetOSComboBox.ItemIndex := i;
TargetOSComboBox.Text := TargetOS;
// Target CPU family
i := TargetCPUComboBox.Items.IndexOf(TargetCPU);
if i < 0 then
i := 0; // 0 is default
TargetCPUComboBox.ItemIndex := i;
TargetCPUComboBox.Text := TargetCPU;
// Target Processor
TargetProcessorProcComboBox.Text := ProcessorToCaption(TargetProcessor);
cmbSyntaxMode.Text := SyntaxModeToCaption(SyntaxMode);