📄 dfmstin.dfm
字号:
object dfm_stin: Tdfm_stin
Left = 143
Top = 123
Width = 594
Height = 393
Caption = #36827#20179
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
FormStyle = fsMDIChild
OldCreateOrder = False
Position = poMainFormCenter
Visible = True
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object StatusBar1: TStatusBar
Left = 0
Top = 347
Width = 586
Height = 19
Panels = <>
SimplePanel = False
end
object DBGrid1: TDBGrid
Left = 0
Top = 0
Width = 586
Height = 240
Align = alClient
DataSource = dstsintemp
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'iarecno'
Title.Caption = #21333#21495
Visible = True
end
item
Expanded = False
FieldName = 'iastyl'
Title.Caption = #27454#21495
Visible = True
end
item
Expanded = False
FieldName = 'iacolr'
Title.Caption = #39068#33394
Visible = True
end
item
Expanded = False
FieldName = 'iasize'
Title.Caption = #23610#23544
Visible = True
end
item
Expanded = False
FieldName = 'iasku'
Title.Caption = #26465#30721
Visible = True
end
item
Expanded = False
FieldName = 'iaqty'
Title.Caption = #25968#37327
Visible = True
end
item
Expanded = False
FieldName = 'cuser'
Title.Caption = #24320#21333#20154
Visible = True
end
item
Expanded = False
FieldName = 'iadate'
Title.Caption = #26085#26399
Width = 143
Visible = True
end>
end
object Panel1: TPanel
Left = 0
Top = 240
Width = 586
Height = 82
Align = alBottom
TabOrder = 2
object Label1: TLabel
Left = 372
Top = 19
Width = 26
Height = 13
Caption = #27454#21495
end
object Label2: TLabel
Left = 192
Top = 19
Width = 52
Height = 13
Caption = #36827#36135#21333#21495
end
object Label3: TLabel
Left = 14
Top = 19
Width = 39
Height = 13
Caption = #24320#21333#20154
end
object Label4: TLabel
Left = 16
Top = 48
Width = 26
Height = 13
Caption = #39068#33394
end
object Label5: TLabel
Left = 192
Top = 48
Width = 26
Height = 13
Caption = #23610#30721
end
object Label6: TLabel
Left = 373
Top = 48
Width = 26
Height = 13
Caption = #25968#37327
end
object MaskEdit1: TMaskEdit
Left = 404
Top = 15
Width = 121
Height = 21
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
TabOrder = 0
end
object Edit1: TEdit
Left = 259
Top = 15
Width = 81
Height = 21
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
TabOrder = 1
end
object Edit2: TEdit
Left = 56
Top = 14
Width = 121
Height = 21
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
TabOrder = 2
end
object Edit3: TEdit
Left = 56
Top = 44
Width = 121
Height = 21
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
TabOrder = 3
end
object Edit4: TEdit
Left = 258
Top = 44
Width = 65
Height = 21
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
TabOrder = 4
end
object Edit5: TEdit
Left = 404
Top = 44
Width = 121
Height = 21
ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
TabOrder = 5
end
end
object Panel2: TPanel
Left = 0
Top = 322
Width = 586
Height = 25
Align = alBottom
BevelInner = bvLowered
TabOrder = 3
DesignSize = (
586
25)
object addbtn: TBitBtn
Left = 1
Top = 0
Width = 75
Height = 25
Caption = #22686#21152
TabOrder = 0
OnClick = addbtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333FF33333333FF333993333333300033377F3333333777333993333333
300033F77FFF3333377739999993333333333777777F3333333F399999933333
33003777777333333377333993333333330033377F3333333377333993333333
3333333773333333333F333333333333330033333333F33333773333333C3333
330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
333333333337733333FF3333333C333330003333333733333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object delbtn: TBitBtn
Left = 77
Top = 0
Width = 75
Height = 25
Caption = #21024#38500
TabOrder = 1
OnClick = delbtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object postbtn: TBitBtn
Left = 227
Top = 0
Width = 75
Height = 25
Caption = #30830#23450
Default = True
ModalResult = 1
TabOrder = 2
OnClick = postbtnClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333330000333333333333333333333333F33333333333
00003333344333333333333333388F3333333333000033334224333333333333
338338F3333333330000333422224333333333333833338F3333333300003342
222224333333333383333338F3333333000034222A22224333333338F338F333
8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
33333338F83338F338F33333000033A33333A222433333338333338F338F3333
0000333333333A222433333333333338F338F33300003333333333A222433333
333333338F338F33000033333333333A222433333333333338F338F300003333
33333333A222433333333333338F338F00003333333333333A22433333333333
3338F38F000033333333333333A223333333333333338F830000333333333333
333A333333333333333338330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object cancelbtn: TBitBtn
Left = 302
Top = 0
Width = 75
Height = 25
Cancel = True
Caption = #21462#28040
ModalResult = 2
TabOrder = 3
OnClick = cancelbtnClick
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object BitBtn5: TBitBtn
Left = 510
Top = 0
Width = 75
Height = 25
Anchors = [akTop, akRight]
Caption = #36864#20986
TabOrder = 4
OnClick = BitBtn5Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
NumGlyphs = 2
end
object prnbtn: TBitBtn
Left = 152
Top = 0
Width = 75
Height = 25
Caption = #25171#21360
TabOrder = 5
OnClick = prnbtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
end
end
object dstsintemp: TDataSource
DataSet = tbltsintemp
OnStateChange = dstsintempStateChange
Left = 16
Top = 64
end
object tbltsintemp: TTable
BeforePost = tbltsintempBeforePost
DatabaseName = 'atoa'
FieldDefs = <
item
Name = 'iastor'
DataType = ftString
Size = 5
end
item
Name = 'iastyl'
DataType = ftString
Size = 6
end
item
Name = 'iacolr'
DataType = ftString
Size = 3
end
item
Name = 'iasize'
DataType = ftString
Size = 2
end
item
Name = 'iaqty'
DataType = ftFloat
end
item
Name = 'iasku'
DataType = ftString
Size = 13
end
item
Name = 'iadate'
DataType = ftDateTime
end
item
Name = 'iarecno'
DataType = ftInteger
end
item
Name = 'cuser'
DataType = ftString
Size = 10
end>
IndexDefs = <
item
Name = 'iiarecno'
Fields = 'iarecno'
end
item
Name = 'uiarias'
Fields = 'iarecno;iasku'
end>
StoreDefs = True
TableName = 'dbo.bkintemp'
Left = 48
Top = 64
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -