lazarus/converter/convertsettings.lfm

380 lines
10 KiB
Plaintext

object ConvertSettingsForm: TConvertSettingsForm
Left = 315
Height = 341
Top = 127
Width = 561
ActiveControl = ProjectPathEdit
Caption = 'Convert Delphi unit, project or package '
ClientHeight = 341
ClientWidth = 561
Constraints.MinHeight = 300
Constraints.MinWidth = 400
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poScreenCenter
LCLVersion = '0.9.31'
object ProjectPathEdit: TLabeledEdit
AnchorSideLeft.Control = Owner
Left = 9
Height = 17
Hint = 'Directory where project''s main file must be'
Top = 32
Width = 287
BorderSpacing.Left = 9
BorderStyle = bsNone
Color = clBtnFace
EditLabel.AnchorSideLeft.Control = ProjectPathEdit
EditLabel.AnchorSideTop.Control = ProjectPathEdit
EditLabel.AnchorSideTop.Side = asrCenter
EditLabel.AnchorSideRight.Control = ProjectPathEdit
EditLabel.AnchorSideBottom.Control = ProjectPathEdit
EditLabel.Left = 9
EditLabel.Height = 16
EditLabel.Top = 9
EditLabel.Width = 78
EditLabel.Caption = 'Project Path:'
EditLabel.ParentColor = False
LabelSpacing = 7
ParentShowHint = False
ReadOnly = True
ShowHint = True
TabOrder = 0
end
object BackupCheckBox: TCheckBox
AnchorSideLeft.Control = TargetGroupBox
AnchorSideTop.Control = TargetGroupBox
AnchorSideTop.Side = asrBottom
Left = 12
Height = 20
Hint = 'Creates a Backup directory under project directory'
Top = 165
Width = 208
BorderSpacing.Left = 3
BorderSpacing.Top = 9
Caption = 'Make backup of changed files'
Checked = True
ParentShowHint = False
ShowHint = True
State = cbChecked
TabOrder = 1
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 40
Top = 295
Width = 549
OKButton.Name = 'OKButton'
OKButton.Caption = '&OK'
HelpButton.Name = 'HelpButton'
HelpButton.Caption = '&Help'
CloseButton.Name = 'CloseButton'
CloseButton.Caption = '&Close'
CloseButton.Enabled = False
CancelButton.Name = 'CancelButton'
CancelButton.Caption = 'Cancel'
TabOrder = 2
ShowButtons = [pbOK, pbCancel, pbHelp]
end
object KeepFileOpenCheckBox: TCheckBox
AnchorSideLeft.Control = BackupCheckBox
AnchorSideTop.Control = BackupCheckBox
AnchorSideTop.Side = asrBottom
Left = 12
Height = 20
Hint = 'Separate form files allow different properties'
Top = 190
Width = 241
BorderSpacing.Top = 5
Caption = 'Keep converted files open in editor'
ParentShowHint = False
ShowHint = True
TabOrder = 3
end
object UnitReplaceDivider: TDividerBevel
AnchorSideTop.Control = Owner
Left = 296
Height = 17
Top = 9
Width = 239
Caption = 'Unit Replacements'
BorderSpacing.Top = 9
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
LeftIndent = 30
end
object UnknownPropsDivider: TDividerBevel
AnchorSideLeft.Control = UnitReplaceDivider
AnchorSideTop.Control = UnitReplaceDivider
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = UnitReplaceDivider
AnchorSideRight.Side = asrBottom
Left = 296
Height = 17
Top = 65
Width = 239
Caption = 'Unknown properties'
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 39
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
LeftIndent = 30
end
object UnitReplaceButton: TBitBtn
AnchorSideLeft.Control = UnitReplaceDivider
AnchorSideTop.Control = UnitReplaceDivider
AnchorSideTop.Side = asrBottom
Left = 297
Height = 25
Hint = 'Unit names in uses section of a source unit'
Top = 27
Width = 75
BorderSpacing.Left = 1
BorderSpacing.Top = 1
Caption = 'Edit'
OnClick = UnitReplaceButtonClick
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
object TypeReplaceDivider: TDividerBevel
AnchorSideLeft.Control = UnitReplaceDivider
AnchorSideTop.Control = UnknownPropsDivider
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = UnitReplaceDivider
AnchorSideRight.Side = asrBottom
Left = 296
Height = 17
Top = 121
Width = 239
Caption = 'Type Replacements'
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 39
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
LeftIndent = 30
end
object TypeReplaceButton: TBitBtn
AnchorSideLeft.Control = TypeReplaceDivider
AnchorSideTop.Control = TypeReplaceDivider
AnchorSideTop.Side = asrBottom
Left = 297
Height = 25
Hint = 'Unknown types in form file (DFM/LFM)'
Top = 139
Width = 75
BorderSpacing.Left = 1
BorderSpacing.Top = 1
Caption = 'Edit'
OnClick = TypeReplaceButtonClick
ParentShowHint = False
ShowHint = True
TabOrder = 5
end
object FuncReplaceDivider: TDividerBevel
AnchorSideLeft.Control = UnitReplaceDivider
AnchorSideTop.Control = TypeReplaceDivider
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = UnitReplaceDivider
AnchorSideRight.Side = asrBottom
Left = 296
Height = 17
Top = 177
Width = 239
Caption = 'Function Replacements'
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 39
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
LeftIndent = 30
end
object CoordOffsDivider: TDividerBevel
AnchorSideLeft.Control = UnitReplaceDivider
AnchorSideTop.Control = FuncReplaceDivider
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = UnitReplaceDivider
AnchorSideRight.Side = asrBottom
Left = 296
Height = 17
Top = 233
Width = 239
Caption = 'Coordinate Offsets'
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 39
Font.Style = [fsBold]
ParentFont = False
ParentShowHint = False
ShowHint = True
LeftIndent = 30
end
object FuncReplaceButton: TBitBtn
AnchorSideLeft.Control = FuncReplaceDivider
AnchorSideTop.Control = FuncReplaceDivider
AnchorSideTop.Side = asrBottom
Left = 297
Height = 25
Hint = 'Some Delphi functions can be replaced with a LCL function'
Top = 195
Width = 75
BorderSpacing.Left = 1
BorderSpacing.Top = 1
Caption = 'Edit'
OnClick = FuncReplaceButtonClick
ParentShowHint = False
ShowHint = True
TabOrder = 6
end
object CoordOffsButton: TBitBtn
AnchorSideLeft.Control = CoordOffsDivider
AnchorSideTop.Control = CoordOffsDivider
AnchorSideTop.Side = asrBottom
Left = 297
Height = 25
Hint = 'Some Delphi functions can be replaced with a LCL function'
Top = 251
Width = 75
BorderSpacing.Left = 1
BorderSpacing.Top = 1
Caption = 'Edit'
OnClick = CoordOffsButtonClick
ParentShowHint = False
ShowHint = True
TabOrder = 7
end
object TargetGroupBox: TGroupBox
AnchorSideLeft.Control = ProjectPathEdit
AnchorSideTop.Control = ProjectPathEdit
AnchorSideTop.Side = asrBottom
Left = 9
Height = 96
Hint = 'xxx'
Top = 60
Width = 228
BorderSpacing.Top = 11
Caption = 'Target'
ClientHeight = 77
ClientWidth = 224
ParentShowHint = False
ShowHint = True
TabOrder = 8
object SupportDelphiCheckBox: TCheckBox
AnchorSideLeft.Control = MultiPlatformCheckBox
AnchorSideTop.Control = MultiPlatformCheckBox
AnchorSideTop.Side = asrBottom
Left = 10
Height = 20
Top = 29
Width = 115
BorderSpacing.Top = 5
Caption = 'Support Delphi'
OnChange = SupportDelphiCheckBoxChange
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object SameDfmCheckBox: TCheckBox
AnchorSideLeft.Control = SupportDelphiCheckBox
AnchorSideTop.Control = SupportDelphiCheckBox
AnchorSideTop.Side = asrBottom
Left = 10
Height = 20
Top = 54
Width = 194
BorderSpacing.Top = 5
Caption = 'Use the same DFM form file'
OnChange = SameDfmCheckBoxChange
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object MultiPlatformCheckBox: TCheckBox
AnchorSideTop.Control = TargetGroupBox
Left = 10
Height = 20
Top = 4
Width = 108
BorderSpacing.Top = 4
Caption = 'Multi-Platform'
ParentShowHint = False
ShowHint = True
TabOrder = 2
end
end
object UnitReplaceComboBox: TComboBox
AnchorSideLeft.Control = UnitReplaceButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = UnitReplaceButton
AnchorSideTop.Side = asrCenter
Left = 395
Height = 21
Top = 29
Width = 136
BorderSpacing.Left = 23
ItemHeight = 0
Style = csDropDownList
TabOrder = 9
end
object UnknownPropsComboBox: TComboBox
AnchorSideLeft.Control = UnitReplaceComboBox
AnchorSideTop.Control = UnknownPropsDivider
AnchorSideTop.Side = asrBottom
Left = 395
Height = 21
Top = 84
Width = 136
BorderSpacing.Top = 2
ItemHeight = 0
Style = csDropDownList
TabOrder = 10
end
object FuncReplaceComboBox: TComboBox
AnchorSideLeft.Control = FuncReplaceButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = FuncReplaceButton
AnchorSideTop.Side = asrCenter
Left = 395
Height = 21
Top = 197
Width = 136
BorderSpacing.Left = 23
ItemHeight = 0
Style = csDropDownList
TabOrder = 11
end
object CoordOffsComboBox: TComboBox
AnchorSideLeft.Control = CoordOffsButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CoordOffsButton
AnchorSideTop.Side = asrCenter
Left = 395
Height = 21
Top = 253
Width = 136
BorderSpacing.Left = 23
ItemHeight = 0
Style = csDropDownList
TabOrder = 12
end
object TypeReplaceComboBox: TComboBox
AnchorSideLeft.Control = TypeReplaceButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TypeReplaceButton
AnchorSideTop.Side = asrCenter
Left = 395
Height = 21
Top = 141
Width = 136
BorderSpacing.Left = 23
ItemHeight = 0
Style = csDropDownList
TabOrder = 13
end
end