📄 cljccx.~dfm
字号:
object cljccxfrm: Tcljccxfrm
Left = 57
Top = 107
Width = 720
Height = 423
Caption = #26448#26009#32467#23384#26597#35810
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 16
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 712
Height = 89
Align = alTop
Caption = #26597#35810#39033
TabOrder = 0
object Label8: TLabel
Left = 8
Top = 20
Width = 52
Height = 13
Caption = #26448#26009#32534#30721
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 184
Top = 20
Width = 52
Height = 13
Caption = #26448#26009#31867#22411
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 16
Top = 60
Width = 46
Height = 13
Caption = #25968#37327'-'#12299
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Edit1: TEdit
Left = 62
Top = 16
Width = 89
Height = 24
TabOrder = 0
end
object Panel1: TPanel
Left = 562
Top = 18
Width = 148
Height = 69
Align = alRight
BevelOuter = bvSpace
ParentColor = True
TabOrder = 1
object DBNavigator1: TDBNavigator
Left = 4
Top = 40
Width = 140
Height = 25
DataSource = dm.cxjcbds
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
Hints.Strings = (
#31532#19968#26465
#21069#19968#26465
#19979#19968#26465
#26368#21518#19968#26465
#22686#21152
#21024#38500
#20462#25913
#20445#23384
#21462#28040
#21047#26032)
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object Button1: TButton
Left = 80
Top = 2
Width = 67
Height = 25
Caption = ' '#36864#20986
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 1
Top = 2
Width = 67
Height = 25
Caption = #25191#34892#26597#35810
TabOrder = 2
OnClick = Button2Click
end
end
object slxx1: TComboBox
Left = 278
Top = 56
Width = 81
Height = 21
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 2
Items.Strings = (
''
#19978#26376#37329#39069
#36827#20179#37329#39069
#20986#20179#37329#39069
#32467#23384#37329#39069)
end
object slcb1: TComboBox
Left = 143
Top = 56
Width = 40
Height = 21
BevelKind = bkTile
Style = csDropDownList
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ImeName = #29579#30721#20116#31508#22411
ItemHeight = 13
ItemIndex = 0
ParentFont = False
TabOrder = 3
Text = '>'
Items.Strings = (
'>'
'='
'<'
'>='
'<=')
end
object sled1: TSpinEdit
Left = 183
Top = 56
Width = 67
Height = 22
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
MaxValue = 0
MinValue = 0
ParentFont = False
TabOrder = 4
Value = 0
end
object sled2: TSpinEdit
Left = 398
Top = 56
Width = 67
Height = 22
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
MaxValue = 0
MinValue = 0
ParentFont = False
TabOrder = 5
Value = 0
end
object slcb2: TComboBox
Left = 358
Top = 56
Width = 40
Height = 21
BevelKind = bkTile
Style = csDropDownList
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ImeName = #29579#30721#20116#31508#22411
ItemHeight = 13
ItemIndex = 0
ParentFont = False
TabOrder = 6
Text = '>'
Items.Strings = (
'>'
'='
'<'
'>='
'<=')
end
object slxx2: TComboBox
Left = 62
Top = 56
Width = 81
Height = 21
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 7
Items.Strings = (
''
#19978#26376#32467#23384
#36827#20179#25968#37327
#20986#20179#25968#37327
#26412#26376#32467#23384)
end
object dblkbox: TDBLookupComboboxEh
Left = 240
Top = 16
Width = 121
Height = 24
EditButtons = <>
KeyField = #31867#22411'ID'
ListField = #31867#22411#21517#31216
ListSource = dm.whcllxdmds
TabOrder = 8
Visible = True
end
end
object DBGridEh1: TDBGridEh
Left = 0
Top = 137
Width = 712
Height = 233
Align = alClient
DataSource = dm.cxjcbds
Flat = True
FooterColor = 16439211
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -13
FooterFont.Name = 'MS Sans Serif'
FooterFont.Style = []
FooterRowCount = 1
FrozenCols = 2
PopupMenu = PopupMenu1
SumList.Active = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
UseMultiTitle = True
Columns = <
item
EditButtons = <>
FieldName = #26448#26009#32534#30721
Footer.Alignment = taRightJustify
Footer.Value = #24635#35760#24405'->'
Footer.ValueType = fvtStaticText
Footers = <>
ReadOnly = True
end
item
EditButtons = <>
FieldName = #26448#26009#21517#31216
Footer.ValueType = fvtCount
Footers = <>
ReadOnly = True
end
item
EditButtons = <>
FieldName = #21333#20301
Footers = <>
ReadOnly = True
end
item
EditButtons = <>
FieldName = #26448#26009#35268#26684
Footers = <>
ReadOnly = True
end
item
EditButtons = <>
FieldName = #31867#22411
Footer.Alignment = taCenter
Footer.Value = #21512#35745
Footer.ValueType = fvtStaticText
Footers = <>
ReadOnly = True
Width = 87
end
item
EditButtons = <>
FieldName = #31867#22411'ID'
Footers = <>
ReadOnly = True
Visible = False
end
item
EditButtons = <>
FieldName = #20179#24211'ID'
Footers = <>
ReadOnly = True
Visible = False
Width = 59
end
item
EditButtons = <>
FieldName = #19978#26376#32467#23384
Footer.ValueType = fvtSum
Footers = <>
ReadOnly = True
Title.Caption = #19978#26376#32467#23384'|'#25968#37327
Width = 60
end
item
EditButtons = <>
FieldName = #19978#26376#21333#20215
Footers = <>
ReadOnly = True
Title.Caption = #19978#26376#32467#23384'|'#21333#20215
Width = 60
end
item
EditButtons = <>
FieldName = #19978#26376#37329#39069
Footer.ValueType = fvtSum
Footers = <>
ReadOnly = True
Title.Caption = #19978#26376#32467#23384'|'#37329#39069
Width = 60
end
item
EditButtons = <>
FieldName = #36827#20179#25968#37327
Footer.ValueType = fvtSum
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -