mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-09 20:53:25 +02:00
73 lines
1.7 KiB
Plaintext
73 lines
1.7 KiB
Plaintext
object frFieldsForm: TfrFieldsForm
|
|
Left = 337
|
|
Height = 351
|
|
Top = 123
|
|
Width = 307
|
|
ActiveControl = ValList
|
|
BorderStyle = bsDialog
|
|
Caption = 'Insert DB field'
|
|
ClientHeight = 351
|
|
ClientWidth = 307
|
|
KeyPreview = True
|
|
OnActivate = FormActivate
|
|
OnCreate = FormCreate
|
|
OnDeactivate = FormDeactivate
|
|
OnKeyDown = FormKeyDown
|
|
Position = poScreenCenter
|
|
LCLVersion = '0.9.29'
|
|
object Label1: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
Left = 6
|
|
Height = 18
|
|
Top = 6
|
|
Width = 90
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Available DB''s'
|
|
FocusControl = ValCombo
|
|
ParentColor = False
|
|
end
|
|
object ValCombo: TComboBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Label1
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 6
|
|
Height = 31
|
|
Top = 30
|
|
Width = 295
|
|
HelpContext = 10
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSelect = False
|
|
BorderSpacing.Around = 6
|
|
ItemHeight = 0
|
|
OnChange = ValComboClick
|
|
Style = csDropDownList
|
|
TabOrder = 0
|
|
end
|
|
object ValList: TListBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = ValCombo
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 6
|
|
Height = 278
|
|
Top = 67
|
|
Width = 295
|
|
HelpContext = 23
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
ClickOnSelChange = False
|
|
ItemHeight = 0
|
|
OnDblClick = ValListDblClick
|
|
OnKeyDown = ValListKeyDown
|
|
OnSelectionChange = ValListSelectionChange
|
|
TabOrder = 1
|
|
TopIndex = -1
|
|
end
|
|
end
|