lazarus-ccr/components/rx/rxdbgrid_findunit.lfm
alexs75 b1c6b6141a 1. RxLockupCombo - fix paint control whith color for null values
2. RxDBGrid find dialog - improved localization
3. RxDBGrid - clear quick search data after mouse click


git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2522 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2012-09-19 14:06:46 +00:00

170 lines
4.1 KiB
Plaintext

object rxDBGridFindForm: TrxDBGridFindForm
Left = 969
Height = 225
Top = 314
Width = 493
ActiveControl = Edit1
Caption = 'Find'
ClientHeight = 225
ClientWidth = 493
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '1.1'
object Label1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideBottom.Control = Edit1
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 15
Top = 6
Width = 66
BorderSpacing.Around = 6
Caption = 'Text to find'
FocusControl = Edit1
ParentColor = False
end
object Label2: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Edit1
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Control = ComboBox1
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 15
Top = 58
Width = 68
BorderSpacing.Around = 6
Caption = 'Find at filed'
ParentColor = False
end
object BtnFind: TButton
AnchorSideRight.Control = Button2
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 347
Height = 35
Top = 184
Width = 79
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Caption = 'Find more'
Default = True
OnClick = BtnFindClick
TabOrder = 4
end
object Button2: TButton
AnchorSideTop.Control = BtnFind
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 432
Height = 35
Top = 184
Width = 55
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Top = 8
BorderSpacing.Around = 6
BorderSpacing.InnerBorder = 4
Cancel = True
Caption = 'Close'
OnClick = Button2Click
TabOrder = 5
end
object Edit1: TEdit
AnchorSideLeft.Control = ComboBox1
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 18
Height = 25
Top = 27
Width = 469
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
TabOrder = 0
end
object ComboBox1: TComboBox
AnchorSideLeft.Control = Label2
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 12
Height = 29
Top = 79
Width = 475
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6
ItemHeight = 0
Style = csDropDownList
TabOrder = 1
end
object CheckBox1: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ComboBox1
AnchorSideTop.Side = asrBottom
Left = 6
Height = 22
Top = 114
Width = 118
BorderSpacing.Around = 6
Caption = 'Case sensetive'
TabOrder = 2
end
object RadioGroup1: TRadioGroup
AnchorSideLeft.Control = CheckBox1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ComboBox1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 130
Height = 51
Top = 114
Width = 357
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Direction'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3
ClientHeight = 34
ClientWidth = 353
Columns = 3
Items.Strings = (
'All'
'Forward'
'Backward'
)
TabOrder = 6
Visible = False
end
object CheckBox2: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = CheckBox1
AnchorSideTop.Side = asrBottom
Left = 6
Height = 22
Top = 142
Width = 84
BorderSpacing.Around = 6
Caption = 'Partial key'
TabOrder = 3
end
end