1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154
|
object frInsertFieldsForm: TfrInsertFieldsForm
Left = 352
Height = 347
Top = 210
Width = 438
ActiveControl = HorzRB
BorderStyle = bsDialog
Caption = 'Insert fields'
ClientHeight = 347
ClientWidth = 438
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '0.9.29'
object Label1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
Left = 6
Height = 16
Top = 6
Width = 117
BorderSpacing.Around = 6
Caption = '&Available datasets'
FocusControl = DatasetCB
ParentColor = False
end
object FieldsL: TListBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = DatasetCB
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = GroupBox1
AnchorSideBottom.Control = ButtonPanel1
Left = 6
Height = 234
Top = 63
Width = 247
HelpContext = 106
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
ClickOnSelChange = False
ItemHeight = 0
MultiSelect = True
TabOrder = 0
TopIndex = -1
end
object DatasetCB: TComboBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = GroupBox1
Left = 6
Height = 29
Top = 28
Width = 247
HelpContext = 97
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
ItemHeight = 0
OnChange = DatasetCBChange
Sorted = True
Style = csDropDownList
TabOrder = 1
end
object GroupBox1: TGroupBox
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 259
Height = 65
Top = 6
Width = 173
Anchors = [akTop, akRight]
BorderSpacing.Around = 6
Caption = 'Placement'
ClientHeight = 49
ClientWidth = 171
TabOrder = 2
object HorzRB: TRadioButton
Left = 8
Height = 22
Top = 5
Width = 89
HelpContext = 115
AllowGrayed = True
Caption = '&Horizontal'
Checked = True
State = cbChecked
TabOrder = 0
end
object VertRB: TRadioButton
Left = 8
Height = 22
Top = 25
Width = 71
HelpContext = 122
AllowGrayed = True
Caption = '&Vertical'
TabOrder = 1
TabStop = False
end
end
object GroupBox2: TGroupBox
AnchorSideTop.Control = GroupBox1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 259
Height = 60
Top = 77
Width = 173
Anchors = [akTop, akRight]
BorderSpacing.Around = 6
ClientHeight = 58
ClientWidth = 171
TabOrder = 3
object HeaderCB: TCheckBox
AnchorSideLeft.Control = GroupBox2
AnchorSideTop.Control = GroupBox2
Left = 6
Height = 22
Top = 6
Width = 125
HelpContext = 132
BorderSpacing.Around = 6
Caption = '&Include headers'
TabOrder = 0
end
object BandCB: TCheckBox
AnchorSideLeft.Control = GroupBox2
AnchorSideTop.Control = HeaderCB
AnchorSideTop.Side = asrBottom
Left = 6
Height = 22
Top = 34
Width = 112
BorderSpacing.Around = 6
Caption = 'Include &bands'
TabOrder = 1
end
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 38
Top = 303
Width = 426
OKButton.Name = 'OKButton'
HelpButton.Name = 'HelpButton'
CloseButton.Name = 'CloseButton'
CloseButton.Enabled = False
CancelButton.Name = 'CancelButton'
TabOrder = 4
ShowButtons = [pbOK, pbCancel, pbHelp]
end
end
|