paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 20:59:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE, "Project options"/"Compiler options"/"Code generation" tab: change layout to make it look better with GTK widgetset on screens with 1024x600 resolution

Browse Source 
git-svn-id: trunk@25047 -
This commit is contained in:
maxim 2010-04-28 22:36:33 +00:00
parent 333bc57311
commit 86de47a747
2 changed files with 35 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

54
ide/frames/compiler_codegen_options.lfm
View File

@ -3,6 +3,7 @@ inherited CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
Width = 601 Width = 601
ClientHeight = 523 ClientHeight = 523
ClientWidth = 601 ClientWidth = 601
TabOrder = 0
DesignLeft = 415 DesignLeft = 415
DesignTop = 197 DesignTop = 197
object grpSmartLinkUnit: TGroupBox[0] object grpSmartLinkUnit: TGroupBox[0]
@ -252,18 +253,6 @@ inherited CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
ClientHeight = 309 ClientHeight = 309
ClientWidth = 597 ClientWidth = 597
TabOrder = 4 TabOrder = 4
object lblOptMiddle: TLabel
AnchorSideLeft.Control = grpOptimizations
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = grpOptimizations
AnchorSideTop.Side = asrCenter
Left = 298
Height = 1
Top = 154
Width = 1
AutoSize = False
ParentColor = False
end
object radOptLevelNone: TRadioButton object radOptLevelNone: TRadioButton
AnchorSideLeft.Control = grpOptimizations AnchorSideLeft.Control = grpOptimizations
AnchorSideTop.Control = grpOptimizations AnchorSideTop.Control = grpOptimizations
@ -317,39 +306,60 @@ inherited CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
TabStop = False TabStop = False
end end
object chkOptVarsInReg: TCheckBox object chkOptVarsInReg: TCheckBox
AnchorSideLeft.Control = lblOptMiddle AnchorSideLeft.Control = grpOptimizations
AnchorSideTop.Control = grpOptimizations AnchorSideTop.Control = Bevel1
Left = 298 AnchorSideTop.Side = asrBottom
Left = 6
Height = 17 Height = 17
Top = 6 Top = 107
Width = 102 Width = 102
BorderSpacing.Left = 6
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
Caption = 'chkOptVarsInReg' Caption = 'chkOptVarsInReg'
TabOrder = 4 TabOrder = 4
end end
object chkOptUncertain: TCheckBox object chkOptUncertain: TCheckBox
AnchorSideLeft.Control = lblOptMiddle AnchorSideLeft.Control = grpOptimizations
AnchorSideTop.Control = chkOptVarsInReg AnchorSideTop.Control = chkOptVarsInReg
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 298 Left = 6
Height = 17 Height = 17
Top = 29 Top = 130
Width = 98 Width = 98
BorderSpacing.Left = 6
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
Caption = 'chkOptUncertain' Caption = 'chkOptUncertain'
TabOrder = 5 TabOrder = 5
end end
object chkOptSmaller: TCheckBox object chkOptSmaller: TCheckBox
AnchorSideLeft.Control = lblOptMiddle AnchorSideLeft.Control = grpOptimizations
AnchorSideTop.Control = chkOptUncertain AnchorSideTop.Control = chkOptUncertain
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 298 AnchorSideBottom.Side = asrBottom
Left = 6
Height = 17 Height = 17
Top = 52 Top = 153
Width = 86 Width = 86
BorderSpacing.Left = 6
BorderSpacing.Top = 6 BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
Caption = 'chkOptSmaller' Caption = 'chkOptSmaller'
TabOrder = 6 TabOrder = 6
end end
object Bevel1: TBevel
AnchorSideLeft.Control = grpOptimizations
AnchorSideTop.Control = radOptLevel3
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = grpOptimizations
AnchorSideRight.Side = asrBottom
Left = 6
Height = 3
Top = 98
Width = 585
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
end
end end
end end

6
ide/frames/compiler_codegen_options.pas
View File

@ -5,14 +5,15 @@ unit compiler_codegen_options;
interface interface
uses uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Classes,SysUtils,FileUtil,Forms,Controls,Graphics,Dialogs,StdCtrls,ExtCtrls,
StdCtrls, IDEOptionsIntf, Project, CompilerOptions, LazarusIDEStrConsts; IDEOptionsIntf,Project,CompilerOptions,LazarusIDEStrConsts;
type type
{ TCompilerCodegenOptionsFrame } { TCompilerCodegenOptionsFrame }
TCompilerCodegenOptionsFrame = class(TAbstractIDEOptionsEditor) TCompilerCodegenOptionsFrame = class(TAbstractIDEOptionsEditor)
Bevel1:TBevel;
chkChecksIO: TCheckBox; chkChecksIO: TCheckBox;
chkChecksOverflow: TCheckBox; chkChecksOverflow: TCheckBox;
chkChecksRange: TCheckBox; chkChecksRange: TCheckBox;
@ -28,7 +29,6 @@ type
grpOptimizations: TGroupBox; grpOptimizations: TGroupBox;
grpSmartLinkUnit: TGroupBox; grpSmartLinkUnit: TGroupBox;
grpTargetPlatform: TGroupBox; grpTargetPlatform: TGroupBox;
lblOptMiddle: TLabel;
lblTargetCPU: TLabel; lblTargetCPU: TLabel;
lblTargetOS: TLabel; lblTargetOS: TLabel;
lblTargetProcessorProc: TLabel; lblTargetProcessorProc: TLabel;