📄 epnuqr.~dfm
字号:
object FormEPNUQR: TFormEPNUQR
Left = 210
Top = 153
Width = 529
Height = 353
Caption = #39033#30446#28165#21333
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object ComboBox1: TComboBox
Left = 8
Top = 8
Width = 145
Height = 21
BevelKind = bkFlat
BevelOuter = bvNone
ItemHeight = 13
ItemIndex = 0
TabOrder = 0
Text = #26410#28165#21457#31080
OnChange = ComboBox1Change
Items.Strings = (
#26410#28165#21457#31080
#26410#28165#20132#36135
#26410#28165#35746#21333
#26410#28165#25910#36135
#26410#28165#37319#36141#35746#21333)
end
object DBGrid1: TDBGrid
Left = 8
Top = 32
Width = 505
Height = 241
DataSource = DataSource1
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Expanded = False
FieldName = 'DocNum'
Title.Caption = #21442#32771#20973#35777#21495
Width = 95
Visible = True
end
item
Expanded = False
FieldName = 'CardCode'
Title.Caption = #23458#25143#20195#30721
Width = 96
Visible = True
end
item
Expanded = False
FieldName = 'CardName'
Title.Caption = #23458#25143
Width = 111
Visible = True
end
item
Expanded = False
Title.Caption = #26377#25928#26085#26399
Width = 93
Visible = True
end
item
Expanded = False
FieldName = 'DocTotal'
Title.Caption = #37329#39069
Visible = True
end>
end
object Button1: TButton
Left = 8
Top = 296
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 2
OnClick = Button1Click
end
object DataSource1: TDataSource
DataSet = DataModHJ.ADOQuP3
Left = 264
Top = 144
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -