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

Converter: improved/fixed converter settings form layout

Browse Source 
git-svn-id: trunk@39700 -
This commit is contained in:
maxim 2012-12-31 18:06:17 +00:00
parent 8c8d550b5c
commit 259ded0029
1 changed files with 61 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

114
converter/convertsettings.lfm
View File

@ -17,7 +17,7 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideRight.Control = UnitReplaceDivider AnchorSideRight.Control = UnitReplaceDivider
Left = 9 Left = 9
Height = 19 Height = 21
Hint = 'Directory where project''s main file must be' Hint = 'Directory where project''s main file must be'
Top = 32 Top = 32
Width = 330 Width = 330
@ -32,8 +32,8 @@ object ConvertSettingsForm: TConvertSettingsForm
EditLabel.AnchorSideRight.Side = asrBottom EditLabel.AnchorSideRight.Side = asrBottom
EditLabel.AnchorSideBottom.Control = ProjectPathEdit EditLabel.AnchorSideBottom.Control = ProjectPathEdit
EditLabel.Left = 9 EditLabel.Left = 9
EditLabel.Height = 15 EditLabel.Height = 13
EditLabel.Top = 10 EditLabel.Top = 12
EditLabel.Width = 330 EditLabel.Width = 330
EditLabel.Caption = 'Project Path:' EditLabel.Caption = 'Project Path:'
EditLabel.ParentColor = False EditLabel.ParentColor = False
@ -48,10 +48,10 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = TargetGroupBox AnchorSideTop.Control = TargetGroupBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 12 Left = 12
Height = 21 Height = 17
Hint = 'Creates a Backup directory under project directory' Hint = 'Creates a Backup directory under project directory'
Top = 179 Top = 166
Width = 210 Width = 159
BorderSpacing.Left = 3 BorderSpacing.Left = 3
BorderSpacing.Top = 9 BorderSpacing.Top = 9
Caption = 'Make backup of changed files' Caption = 'Make backup of changed files'
@ -63,8 +63,8 @@ object ConvertSettingsForm: TConvertSettingsForm
end end
object ButtonPanel1: TButtonPanel object ButtonPanel1: TButtonPanel
Left = 6 Left = 6
Height = 38 Height = 34
Top = 311 Top = 315
Width = 587 Width = 587
OKButton.Name = 'OKButton' OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True OKButton.DefaultCaption = True
@ -84,10 +84,10 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = BackupCheckBox AnchorSideTop.Control = BackupCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 12 Left = 12
Height = 21 Height = 17
Hint = 'Separate form files allow different properties' Hint = 'Separate form files allow different properties'
Top = 205 Top = 188
Width = 241 Width = 185
BorderSpacing.Top = 5 BorderSpacing.Top = 5
Caption = 'Keep converted files open in editor' Caption = 'Keep converted files open in editor'
ParentShowHint = False ParentShowHint = False
@ -257,14 +257,15 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = ProjectPathEdit AnchorSideTop.Control = ProjectPathEdit
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 9 Left = 9
Height = 108 Height = 93
Hint = 'xxx' Hint = 'xxx'
Top = 62 Top = 64
Width = 255 Width = 165
AutoSize = True
BorderSpacing.Top = 11 BorderSpacing.Top = 11
Caption = 'Target' Caption = 'Target'
ClientHeight = 91 ClientHeight = 75
ClientWidth = 251 ClientWidth = 161
ParentShowHint = False ParentShowHint = False
ShowHint = True ShowHint = True
TabOrder = 8 TabOrder = 8
@ -272,11 +273,12 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideLeft.Control = CrossPlatformCheckBox AnchorSideLeft.Control = CrossPlatformCheckBox
AnchorSideTop.Control = CrossPlatformCheckBox AnchorSideTop.Control = CrossPlatformCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 Left = 6
Height = 21 Height = 17
Top = 30 Top = 29
Width = 116 Width = 88
BorderSpacing.Top = 5 BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = 'Support Delphi' Caption = 'Support Delphi'
OnChange = SupportDelphiCheckBoxChange OnChange = SupportDelphiCheckBoxChange
ParentShowHint = False ParentShowHint = False
@ -284,14 +286,17 @@ object ConvertSettingsForm: TConvertSettingsForm
TabOrder = 0 TabOrder = 0
end end
object SameDfmCheckBox: TCheckBox object SameDfmCheckBox: TCheckBox
AnchorSideLeft.Control = SupportDelphiCheckBox AnchorSideLeft.Control = CrossPlatformCheckBox
AnchorSideTop.Control = SupportDelphiCheckBox AnchorSideTop.Control = SupportDelphiCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 10 AnchorSideRight.Side = asrBottom
Height = 21 Left = 6
Top = 56 Height = 17
Width = 194 Top = 52
BorderSpacing.Top = 5 Width = 149
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
Caption = 'Use the same DFM form file' Caption = 'Use the same DFM form file'
OnChange = SameDfmCheckBoxChange OnChange = SameDfmCheckBoxChange
ParentShowHint = False ParentShowHint = False
@ -299,12 +304,15 @@ object ConvertSettingsForm: TConvertSettingsForm
TabOrder = 1 TabOrder = 1
end end
object CrossPlatformCheckBox: TCheckBox object CrossPlatformCheckBox: TCheckBox
AnchorSideLeft.Control = TargetGroupBox
AnchorSideTop.Control = TargetGroupBox AnchorSideTop.Control = TargetGroupBox
Left = 10 Left = 6
Height = 21 Height = 17
Top = 4 Top = 6
Width = 114 Width = 89
BorderSpacing.Top = 4 BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
Caption = 'Cross-platform' Caption = 'Cross-platform'
ParentShowHint = False ParentShowHint = False
ShowHint = True ShowHint = True
@ -317,11 +325,11 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = UnitReplaceButton AnchorSideTop.Control = UnitReplaceButton
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 447 Left = 447
Height = 27 Height = 21
Top = 26 Top = 29
Width = 136 Width = 136
BorderSpacing.Left = 23 BorderSpacing.Left = 23
ItemHeight = 0 ItemHeight = 13
Style = csDropDownList Style = csDropDownList
TabOrder = 9 TabOrder = 9
end end
@ -330,11 +338,11 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = UnknownPropsDivider AnchorSideTop.Control = UnknownPropsDivider
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 447 Left = 447
Height = 27 Height = 21
Top = 84 Top = 84
Width = 136 Width = 136
BorderSpacing.Top = 2 BorderSpacing.Top = 2
ItemHeight = 0 ItemHeight = 13
Style = csDropDownList Style = csDropDownList
TabOrder = 10 TabOrder = 10
end end
@ -344,11 +352,11 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = FuncReplaceButton AnchorSideTop.Control = FuncReplaceButton
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 447 Left = 447
Height = 27 Height = 21
Top = 194 Top = 197
Width = 136 Width = 136
BorderSpacing.Left = 23 BorderSpacing.Left = 23
ItemHeight = 0 ItemHeight = 13
Style = csDropDownList Style = csDropDownList
TabOrder = 11 TabOrder = 11
end end
@ -358,11 +366,11 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = CoordOffsButton AnchorSideTop.Control = CoordOffsButton
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 447 Left = 447
Height = 27 Height = 21
Top = 250 Top = 253
Width = 136 Width = 136
BorderSpacing.Left = 23 BorderSpacing.Left = 23
ItemHeight = 0 ItemHeight = 13
Style = csDropDownList Style = csDropDownList
TabOrder = 12 TabOrder = 12
end end
@ -372,11 +380,11 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = TypeReplaceButton AnchorSideTop.Control = TypeReplaceButton
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 447 Left = 447
Height = 27 Height = 21
Top = 138 Top = 141
Width = 136 Width = 136
BorderSpacing.Left = 23 BorderSpacing.Left = 23
ItemHeight = 0 ItemHeight = 13
Style = csDropDownList Style = csDropDownList
TabOrder = 13 TabOrder = 13
end end
@ -385,9 +393,9 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = KeepFileOpenCheckBox AnchorSideTop.Control = KeepFileOpenCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 181 Left = 142
Height = 20 Height = 20
Top = 250 Top = 229
Width = 102 Width = 102
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 24 BorderSpacing.Top = 24
@ -399,9 +407,9 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Control = ScanProgressBar AnchorSideTop.Control = ScanProgressBar
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 12 Left = 12
Height = 15 Height = 13
Top = 253 Top = 233
Width = 163 Width = 124
Caption = 'Scanning parent directory' Caption = 'Scanning parent directory'
ParentColor = False ParentColor = False
end end
@ -411,9 +419,9 @@ object ConvertSettingsForm: TConvertSettingsForm
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ScanProgressBar AnchorSideRight.Control = ScanProgressBar
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 181 Left = 142
Height = 25 Height = 25
Top = 271 Top = 250
Width = 102 Width = 102
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 1 BorderSpacing.Top = 1