📄 udtcx_ry.~dfm
字号:
object frmDTCX_RY: TfrmDTCX_RY
Left = 211
Top = 107
ActiveControl = btnClose
BorderStyle = bsDialog
Caption = '查询对话框'
ClientHeight = 434
ClientWidth = 553
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyPress = FormKeyPress
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Image1: TImage
Left = 441
Top = 17
Width = 9
Height = 9
AutoSize = True
Center = True
Picture.Data = {
07544269746D6170BE000000424DBE0000000000000076000000280000000900
0000090000000100040000000000480000000000000000000000100000001000
0000FFFFFF00FF52C600FF94DE00FF5ACE00FFD6F70000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000004212400000000002131114000000004311131140000000211131112000
0000311311113000000021111311200000004311111340000000021111120000
00000042320000000000}
end
object pagMain: TPageControl
Left = 0
Top = 0
Width = 553
Height = 401
ActivePage = tabEdit
Align = alClient
TabOrder = 0
object tabCond: TTabSheet
Caption = '查询条件'
ImageIndex = 3
object Label2: TLabel
Left = 8
Top = 16
Width = 300
Height = 12
Caption = '说明：输入查询条件后，按“下一步”查看查询条件汇总'
end
object GroupBox1: TGroupBox
Left = 5
Top = 41
Width = 242
Height = 328
Caption = '字段列表'
TabOrder = 0
object lstFieldBox: TListBox
Left = 2
Top = 14
Width = 238
Height = 295
Align = alClient
ItemHeight = 12
Style = lbOwnerDrawFixed
TabOrder = 0
OnClick = lstFieldBoxClick
OnDrawItem = lstFieldBoxDrawItem
end
object tabField: TTabSet
Left = 2
Top = 309
Width = 238
Height = 17
Align = alBottom
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
Tabs.Strings = (
'全部字段')
TabIndex = 0
end
end
object GroupBox2: TGroupBox
Left = 250
Top = 41
Width = 260
Height = 328
Caption = '字段名称'
TabOrder = 1
object Notebook1: TNotebook
Left = 2
Top = 14
Width = 256
Height = 295
Align = alClient
TabOrder = 0
object TPage
Left = 0
Top = 0
Caption = 'pagValue'
object lblField: TLabel
Left = 9
Top = 21
Width = 36
Height = 12
Caption = '字段值'
end
object edtValue: TEdit
Left = 45
Top = 18
Width = 133
Height = 20
TabOrder = 0
OnExit = edtValueExit
end
object btnClear: TButton
Left = 177
Top = 17
Width = 48
Height = 21
Caption = '清除'
TabOrder = 2
OnClick = btnClearClick
end
object cmbValue: TComboBox
Left = 45
Top = 50
Width = 133
Height = 20
Style = csDropDownList
ItemHeight = 12
TabOrder = 3
OnExit = cmbValueExit
end
object RadioGroup1: TRadioGroup
Left = 12
Top = 121
Width = 210
Height = 78
Caption = '匹配条件'
Items.Strings = (
'完全匹配'
'部分匹配')
TabOrder = 1
OnClick = RadioGroup1Click
end
object Panel1: TPanel
Left = 12
Top = 197
Width = 209
Height = 41
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 4
object CheckBox1: TCheckBox
Left = 10
Top = 11
Width = 183
Height = 17
Caption = '不-操作'
TabOrder = 0
OnClick = CheckBox1Click
end
end
object dtpValue: TwwDBDateTimePicker
Left = 45
Top = 72
Width = 133
Height = 20
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'MS Sans Serif'
CalendarAttributes.Font.Style = []
DateFormat = dfLong
Epoch = 1950
ShowButton = True
TabOrder = 5
OnExit = dtpValueExit
end
end
object TPage
Left = 0
Top = 0
Caption = 'pagRange'
object lblMin: TLabel
Left = 9
Top = 21
Width = 36
Height = 12
Caption = '最小值'
end
object lblMax: TLabel
Left = 9
Top = 44
Width = 36
Height = 12
Caption = '最大值'
end
object edtMin: TEdit
Left = 45
Top = 16
Width = 133
Height = 20
TabOrder = 0
OnExit = edtMinExit
end
object btnClearMin: TButton
Left = 177
Top = 15
Width = 48
Height = 21
Caption = '清除'
TabOrder = 1
OnClick = btnClearMinClick
end
object edtMax: TEdit
Left = 45
Top = 41
Width = 133
Height = 20
TabOrder = 2
OnExit = edtMaxExit
end
object btnClearMax: TButton
Left = 177
Top = 42
Width = 48
Height = 21
Caption = '清除'
TabOrder = 3
OnClick = btnClearMaxClick
end
object dtpMax: TwwDBDateTimePicker
Left = 45
Top = 128
Width = 133
Height = 20
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'MS Sans Serif'
CalendarAttributes.Font.Style = []
DateFormat = dfLong
Epoch = 1950
ShowButton = True
TabOrder = 4
OnExit = dtpMaxExit
end
object dtpMin: TwwDBDateTimePicker
Left = 45
Top = 104
Width = 133
Height = 20
CalendarAttributes.Font.Charset = DEFAULT_CHARSET
CalendarAttributes.Font.Color = clWindowText
CalendarAttributes.Font.Height = -11
CalendarAttributes.Font.Name = 'MS Sans Serif'
CalendarAttributes.Font.Style = []
DateFormat = dfLong
Epoch = 1950
ShowButton = True
TabOrder = 5
OnExit = dtpMinExit
end
end
end
object tabSelect: TTabSet
Left = 2
Top = 309
Width = 256
Height = 17
Align = alBottom
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
Tabs.Strings = (
'选择值'
'选择范围')
TabIndex = 0
OnChange = tabSelectChange
end
end
end
object tabSummy: TTabSheet
Caption = '条件汇总'
ImageIndex = 2
object Label3: TLabel
Left = 8
Top = 12
Width = 156
Height = 12
Caption = '显示所有已经选择的查询条件'
end
object Label4: TLabel
Left = 10
Top = 28
Width = 348
Height = 12
Caption = '选择“上一步”，重新设置条件；选择“下一步”，查看查询结果'
end
object ListView1: TListView
Left = 0
Top = 98
Width = 545
Height = 276
Align = alBottom
Columns = <
item
Caption = '字段名称'
Width = 150
end
item
Caption = '取值条件'
Width = 200
end>
GridLines = True
TabOrder = 0
ViewStyle = vsReport
end
end
object tabResult: TTabSheet
Caption = '查询结果'
ImageIndex = 1
object Panel2: TPanel
Left = 0
Top = 0
Width = 545
Height = 28
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object lblResult: TLabel
Left = 9
Top = 9
Width = 96
Height = 12
Caption = '查询结果共有记录'
end
object btnEdit: TButton
Left = 391
Top = 4
Width = 61
Height = 18
Caption = '编辑'
TabOrder = 0
OnClick = btnEditClick
end
end
object grdMain: TDBGrid
Left = 0
Top = 28
Width = 545
Height = 169
Align = alClient
DataSource = souMain
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
end
object Panel6: TPanel
Left = 0
Top = 197
Width = 545
Height = 14
Align = alBottom
Alignment = taLeftJustify
BevelOuter = bvNone
Caption = ' 应发金额'
TabOrder = 2
end
object DBGrid1: TDBGrid
Left = 0
Top = 297
Width = 545
Height = 77
Align = alBottom
DataSource = souSF
Options = [dgEditing, dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -