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

IDE: compiler options: always show -WG option

Browse Source 
git-svn-id: trunk@52589 -
This commit is contained in:
mattias 2016-06-30 12:51:45 +00:00
parent 90f90041ca
commit 17018410ca
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/frames/compiler_config_target.pas
View File

@ -209,12 +209,11 @@ begin
if not GlobalMacroList.SubstituteStr(aTargetOS) then
raise Exception.CreateFmt('Cannot substitute macro "%s".', [aTargetOS]);
end;
// Now hide/show the whole GroupBox because there is only one setting.
grbTargetOptions.Visible := AnsiStartsText('Win', aTargetOS);
if grbTargetOptions.Visible then
CurrentWidgetTypeLabel.AnchorSideTop.Control := grbTargetOptions
if AnsiStartsText('Win', aTargetOS) then
chkWin32GraphicApp.Caption := dlgWin32GUIApp + ' (-WG, active)'
else
CurrentWidgetTypeLabel.AnchorSideTop.Control := grbTargetPlatform;
chkWin32GraphicApp.Caption := dlgWin32GUIApp + ' (-WG, inactive)';
end;
procedure TCompilerConfigTargetFrame.UpdateByTargetCPU(aTargetCPU: string);