📄 sdqctr.~dfm
字号:
object FormSDQCTR: TFormSDQCTR
Left = 133
Top = 102
Width = 671
Height = 443
Caption = #20174#28165#21333#36873#25321
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poDefault
Visible = True
WindowState = wsMaximized
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 8
Width = 63
Height = 13
Caption = #38144#21806#20154#21592' '
end
object Shape1: TShape
Left = 8
Top = 25
Width = 105
Height = 1
Pen.Color = clWhite
end
object Label2: TLabel
Left = 8
Top = 32
Width = 39
Height = 13
Caption = #25351#26631' '
end
object Shape2: TShape
Left = 8
Top = 49
Width = 105
Height = 1
Pen.Color = clWhite
end
object Label3: TLabel
Left = 328
Top = 32
Width = 47
Height = 13
Caption = #25552#25104'% '
end
object Shape3: TShape
Left = 328
Top = 49
Width = 105
Height = 1
Pen.Color = clWhite
end
object Label4: TLabel
Left = 216
Top = 32
Width = 36
Height = 13
Caption = #19975#20803' '
end
object Image1: TImage
Left = 624
Top = 384
Width = 33
Height = 27
Picture.Data = {
055449636F6E0000010001002020040000000000E80200001600000028000000
2000000040000000010004000000000000020000000000000000000000000000
0000000000000000000080000080000000808000800000008000800080800000
C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000
FFFFFF0090101010101010101010101010101010190101010101010101010101
0101010191901010101010101010101010101011191901010101010101010101
0101011191919999999999999999999999991111191999999999999999999999
999911119191999997BBBBBB799999999999111119199999BBBBBBBBBB799999
9999111191919997BBBB777BBBB79999999911111919999BBB7999997BBB7999
999911119191999BBB99999997BBB999999911111919999BBB99999999BBB799
999911119191999BBB999999997BBB99999911111919999BBB799999999BBB99
9999111191919997BBB999999997BB799999111119199999BBB999999999BBB9
9999111191919999BBB999999999BBB999991111191999997BB7999999997BB7
99991111919199999BBB999999999BBB99991111191999999BBB799999999BBB
799911119191999997BBB999999997BBB99911111919999999BBB999999999BB
B99911119191999999BBB799999999BBB799111119199999997BB7999999997B
B799111191919999999999999999999999991111191999999999999999999999
9999111191919999999999999999999999991111191999999999999999999999
9999111191979797979797979797979797971111197979797979797979797979
7979711197979797979797979797979797979711797979797979797979797979
7979797100000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000}
end
object DBText1: TDBText
Left = 248
Top = 8
Width = 65
Height = 17
DataField = 'SlpName'
end
object Edit1: TEdit
Left = 96
Top = 8
Width = 113
Height = 18
BorderStyle = bsNone
TabOrder = 0
OnExit = Edit1Exit
end
object DBGrid1: TDBGrid
Left = 8
Top = 56
Width = 649
Height = 113
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
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 = 'xh'
Title.Caption = #24207#21495
Width = 30
Visible = True
end
item
Expanded = False
FieldName = 'CardCode'
Visible = False
end
item
Expanded = False
FieldName = 'CardName'
Title.Caption = #35746#36135#21333#20301
Width = 88
Visible = True
end
item
Expanded = False
FieldName = 'CTRDocNum'
Title.Caption = #21512#21516#21495
Width = 53
Visible = True
end
item
Expanded = False
FieldName = 'WKODocNum'
Title.Caption = #29983#20135#35745#21010#21495
Visible = True
end
item
Expanded = False
FieldName = 'WKOProdctDate'
Title.Caption = #19979#36798#35745#21010#26085#26399
Width = 77
Visible = True
end
item
Expanded = False
Title.Caption = #21512#21516#20869#23481
Visible = True
end
item
Expanded = False
FieldName = 'Volume'
Title.Caption = #25968#37327
Width = 34
Visible = True
end
item
Expanded = False
FieldName = 'CTRDocTotal'
Title.Caption = #21512#21516#37329#39069
Visible = True
end
item
Expanded = False
FieldName = 'CTRStartDate'
Title.Caption = #21512#21516#20132#36135#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'DLNDocDueDate'
Title.Caption = #21457#36135#26085#26399
Visible = True
end
item
Expanded = False
Title.Caption = #26631#20934#20215#26684
Visible = True
end
item
Expanded = False
FieldName = 'INVDocDate'
Title.Caption = #24320#31080#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'INVDocTotal'
Title.Caption = #24320#31080#37329#39069
Visible = True
end
item
Expanded = False
FieldName = 'SDTotalExpns'
Title.Caption = #36816#36153
Visible = True
end
item
Expanded = False
FieldName = 'DLNDocNum'
Visible = False
end>
end
object DBGrid2: TDBGrid
Left = 8
Top = 168
Width = 649
Height = 105
DataSource = DataSource1
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
Title.Caption = #22238#31548#37329#39069
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#26085#26399
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#37329#39069
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#26085#26399
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#37329#39069
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#26085#26399
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#37329#39069
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#26085#26399
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#37329#39069
Visible = True
end
item
Expanded = False
Title.Caption = #22238#31548#26085#26399
Visible = True
end>
end
object Edit2: TEdit
Left = 96
Top = 32
Width = 113
Height = 18
BorderStyle = bsNone
TabOrder = 3
Text = ' '
end
object Edit3: TEdit
Left = 408
Top = 32
Width = 89
Height = 18
BorderStyle = bsNone
TabOrder = 4
Text = ' '
end
object DBGrid3: TDBGrid
Left = 7
Top = 272
Width = 650
Height = 105
DataSource = DataSource1
TabOrder = 5
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'IPFgs'
Title.Caption = #24037#26102#25104#26412
Width = 67
Visible = True
end
item
Expanded = False
FieldName = 'IPFcl'
Title.Caption = #26448#26009#25104#26412
Visible = True
end
item
Expanded = False
FieldName = 'IPFwg'
Title.Caption = #22806#26500#20214#25104#26412
Visible = True
end
item
Expanded = False
FieldName = 'IPFjwl'
Title.Caption = #26426#29289#26009#25104#26412
Visible = True
end
item
Expanded = False
FieldName = 'IPFww'
Title.Caption = #22996#22806#21152#24037#25104#26412
Visible = True
end
item
Expanded = False
FieldName = 'IPFgl'
Title.Caption = #31649#29702#36153#29992
Visible = True
end
item
Expanded = False
Title.Caption = #26412#21333#25552#25104
Visible = True
end>
end
object Button1: TButton
Left = 8
Top = 384
Width = 75
Height = 25
Caption = #30830#23450
TabOrder = 6
OnClick = Button1Click
end
object DataSource1: TDataSource
DataSet = DataModHJ.ADOQP0
Left = 288
Top = 96
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -