📄 storgecheckfm.dfm
字号:
object storgecheck: Tstorgecheck
Left = 211
Top = 206
Width = 696
Height = 480
Caption = #24211#23384#36164#26009#30424#28857
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object ToolBar: TToolBar
Left = 0
Top = 0
Width = 688
Height = 23
AutoSize = True
ButtonHeight = 21
ButtonWidth = 32
Caption = 'ToolBar'
Flat = True
ShowCaptions = True
TabOrder = 0
object tbtModify: TToolButton
Left = 0
Top = 0
Hint = '??'
Caption = 'EDIT'
ImageIndex = 15
end
object ToolButton1: TToolButton
Left = 32
Top = 0
Width = 8
Caption = 'ToolButton1'
ImageIndex = 21
Style = tbsDivider
end
object tbtNew: TToolButton
Left = 40
Top = 0
Hint = #26032#22686
Caption = #26032#22686
Enabled = False
ImageIndex = 17
end
object tbtDelete: TToolButton
Left = 72
Top = 0
Hint = '?'#38500
Caption = 'DEL'
Enabled = False
ImageIndex = 16
end
object tbtDivider1: TToolButton
Left = 104
Top = 0
Width = 9
Caption = 'tbtDivider1'
ImageIndex = 3
Style = tbsDivider
end
object tbtFirst: TToolButton
Left = 113
Top = 0
Hint = #39318'?'
Caption = #39318
ImageIndex = 8
end
object tbtPrior: TToolButton
Left = 145
Top = 0
Hint = #19978'?'
Caption = #19978
ImageIndex = 9
end
object tbtNext: TToolButton
Left = 177
Top = 0
Hint = #19979'?'
Caption = #19979
ImageIndex = 10
end
object tbtLast: TToolButton
Left = 209
Top = 0
Hint = #26411'?'
Caption = #26411
ImageIndex = 11
end
object tbtDivider: TToolButton
Left = 241
Top = 0
Width = 8
Caption = 'tbtDivider'
ImageIndex = 8
Style = tbsDivider
end
object tbtSave: TToolButton
Left = 249
Top = 0
Hint = #20445#23384
Caption = #20445#23384
Enabled = False
ImageIndex = 4
end
object tbtCancel: TToolButton
Left = 281
Top = 0
Hint = #21462#28040
Caption = #21462#28040
Enabled = False
ImageIndex = 5
end
object tbtFind: TToolButton
Left = 313
Top = 0
Hint = #26597#25214
Caption = #26597#25214
ImageIndex = 14
end
object tbtPrint: TToolButton
Left = 345
Top = 0
Hint = #25171#21360
Caption = #25171#21360
ImageIndex = 3
end
object tbtDivider3: TToolButton
Left = 377
Top = 0
Width = 8
Caption = 'tbtDivider3'
ImageIndex = 12
Style = tbsDivider
end
object tbtExit: TToolButton
Left = 385
Top = 0
Hint = '??'
Caption = 'exit'
ImageIndex = 20
end
end
object Panel1: TPanel
Left = 0
Top = 23
Width = 688
Height = 43
Align = alTop
BevelOuter = bvNone
TabOrder = 1
object Panel2: TPanel
Left = 8
Top = 5
Width = 665
Height = 33
TabOrder = 0
object BitBtn1: TBitBtn
Left = 368
Top = 5
Width = 121
Height = 25
Caption = #25552#21462#25968#25454
Enabled = False
TabOrder = 0
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00000000000000
0000008080000080800000808000008080000080800000808000008080000080
8000008080008080800000000000FF00FF00FF00FF00FF00FF000000000000FF
FF00000000000080800000808000008080000080800000808000008080000080
800000808000008080008080800000000000FF00FF00FF00FF0000000000FFFF
FF0000FFFF008080800000808000008080000080800000808000008080000080
80000080800000808000008080008080800000000000FF00FF000000000000FF
FF00FFFFFF0000FFFF0080808000008080000080800000808000008080000080
800000808000008080000080800000808000808080000000000000000000FFFF
FF0000FFFF00FFFFFF0000FFFF00C0C0C0000080800000808000008080000080
80000080800000808000808080000000000000000000000000000000000000FF
FF00FFFFFF0000FFFF00FFFFFF0000FFFF0000FFFF0000FFFF00000080000000
FF000000FF000000000000000000FF00FF00FF00FF00FF00FF0000000000FFFF
FF0000FFFF00FFFFFF0000FFFF00FFFFFF0000FFFF00000080000000FF000000
FF00000080000000800000000000FF00FF00FF00FF00FF00FF000000000000FF
FF00FFFFFF0000FFFF00FFFFFF0000FFFF00000080000000FF000000FF000000
800000008000000080000000800000000000FF00FF00FF00FF000000000000FF
FF0000FFFF00FFFFFF0000FFFF0000FFFF000000800000008000000080000000
800000008000000000000000000000000000FF00FF00FF00FF00FF00FF000000
0000FFFFFF0000FFFF00FFFFFF0000000000FF00FF00FF00FF00000080000000
FF000000800000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00000000000000000000000000FF00FF00FF00FF00FF00FF00000080000000
FF000000800000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000080000000
FF000000800000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000080000000
FF000000800000000000FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00000080000000
80000000000000000000FF00FF00FF00FF00FF00FF00FF00FF00}
end
object Button1: TButton
Left = 264
Top = 5
Width = 106
Height = 25
Caption = #35843#25972#25968#37327
TabOrder = 1
OnClick = Button1Click
end
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 66
Width = 688
Height = 387
Align = alClient
DataSource = DataSource1
ReadOnly = True
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'fID'
Visible = True
end
item
Expanded = False
FieldName = 'fProductID'
Width = 61
Visible = True
end
item
Expanded = False
FieldName = 'fResID'
Width = 44
Visible = True
end
item
Expanded = False
FieldName = 'fArtID'
Visible = True
end
item
Expanded = False
FieldName = 'fResName'
Width = 75
Visible = True
end
item
Expanded = False
FieldName = 'fResStyle'
Width = 56
Visible = True
end
item
Expanded = False
FieldName = 'fweightqty'
Width = 55
Visible = True
end
item
Expanded = False
FieldName = 'fbillweightqty'
Width = 68
Visible = True
end
item
Expanded = False
FieldName = 'fordweightqty'
Visible = True
end
item
Expanded = False
FieldName = 'fmeasureqty'
Visible = True
end
item
Expanded = False
FieldName = 'fbillMeasureqty'
Visible = True
end
item
Expanded = False
FieldName = 'fOrdMeasureqty'
Visible = True
end
item
Expanded = False
FieldName = 'fUnit'
Width = 21
Visible = True
end
item
Expanded = False
FieldName = 'fWeightUnit'
Visible = True
end
item
Expanded = False
FieldName = 'fMeasureUnit'
Width = 43
Visible = True
end
item
Expanded = False
FieldName = 'fPiecesUnit'
Width = 31
Visible = True
end
item
Expanded = False
FieldName = 'fUnitPrice'
Width = 53
Visible = True
end
item
Expanded = False
FieldName = 'fMoney'
Width = 46
Visible = True
end
item
Expanded = False
FieldName = 'finDate'
Width = 87
Visible = True
end
item
Expanded = False
FieldName = 'fCustName'
Width = 58
Visible = True
end
item
Expanded = False
FieldName = 'fDept'
Width = 36
Visible = True
end
item
Expanded = False
FieldName = 'fSendby'
Width = 48
Visible = True
end
item
Expanded = False
FieldName = 'fSubmitUser'
Width = 69
Visible = True
end
item
Expanded = False
FieldName = 'fInQty'
Width = 36
Visible = True
end
item
Expanded = False
FieldName = 'fOutQty'
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'fBalQty'
Width = 39
Visible = True
end
item
Expanded = False
FieldName = 'fPrePrice'
Width = 52
Visible = True
end
item
Expanded = False
FieldName = 'fIOPrice'
Width = 54
Visible = True
end
item
Expanded = False
FieldName = 'fMaker'
Width = 48
Visible = True
end>
end
object ADOQuery1: TADOQuery
Active = True
ConnectionString = 'file name=stockdb.udl'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from tContractstock')
Left = 200
Top = 79
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 232
Top = 80
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -