📄 untwarn_limit.dfm
字号:
inherited fmstockwarnlimit: Tfmstockwarnlimit
Left = 42
Top = 39
BorderIcons = [biSystemMenu, biMaximize]
Caption = #24211#23384#19978#19979#38480#35774#32622
ClientHeight = 423
ClientWidth = 728
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 728
Height = 87
Align = alTop
BevelInner = bvLowered
BevelOuter = bvLowered
TabOrder = 0
object Label1: TLabel
Left = 24
Top = 56
Width = 119
Height = 14
Caption = #27599#27425#19979#36733#25968#25454#26465#25968':'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object LblSort: TLabel
Left = 367
Top = 58
Width = 112
Height = 14
Caption = #24403#21069#25490#24207#26041#24335#26159#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Bevel1: TBevel
Left = 2
Top = 46
Width = 724
Height = 2
Style = bsRaised
end
object ComboBox1: TComboBox
Left = 176
Top = 54
Width = 87
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
Items.Strings = (
'10'
'20'
'30'
'50'
'100'
'200'
'300'
'400'
'500'
'600'
'700'
'800'
'900'
'1000'
'1500'
'2000'
'2500'
'3000'
'4000'
'5000'
'6000'
#20840#37096)
end
object edtTime: TEdit
Left = 656
Top = 54
Width = 33
Height = 28
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #12356#12421' ('#32649#30768') - '#31325#29460#57646
ParentFont = False
TabOrder = 2
Visible = False
end
object Panel3: TPanel
Left = 2
Top = 2
Width = 724
Height = 45
Align = alTop
BevelOuter = bvLowered
Color = 16573127
TabOrder = 3
object Label2: TLabel
Left = 23
Top = 15
Width = 48
Height = 16
Caption = #31867#21035#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 194
Top = 15
Width = 48
Height = 16
Caption = #21697#29260#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 364
Top = 15
Width = 48
Height = 16
Caption = #21697#31181#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object CBType: TComboBox
Left = 69
Top = 15
Width = 112
Height = 21
Style = csDropDownList
ItemHeight = 13
Sorted = True
TabOrder = 0
OnChange = CBTypeChange
end
object cbBrand: TComboBox
Left = 239
Top = 15
Width = 113
Height = 21
Style = csDropDownList
ItemHeight = 13
Sorted = True
TabOrder = 1
OnChange = cbBrandChange
end
object CbBreed: TComboBox
Left = 412
Top = 15
Width = 125
Height = 21
Style = csDropDownList
ItemHeight = 13
Sorted = True
TabOrder = 2
OnChange = CbBreedChange
end
end
object edtRecNo: TEdit
Left = 548
Top = 16
Width = 168
Height = 22
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 87
Width = 728
Height = 295
Align = alClient
Color = clCream
DataSource = ds_warn_limit
FixedColor = clSkyBlue
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ReadOnly = True
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDrawDataCell = DBGrid1DrawDataCell
OnDrawColumnCell = DBGrid1DrawColumnCell
OnDblClick = DBGrid1DblClick
OnTitleClick = DBGrid1TitleClick
Columns = <
item
Expanded = False
FieldName = 'Storage_NO'
Title.Alignment = taCenter
Title.Caption = #20179#24211#32534#21495
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 'Goods_NO'
Title.Alignment = taCenter
Title.Caption = #21830#21697#32534#21495
Width = 180
Visible = True
end
item
Expanded = False
FieldName = 'Goods_Name'
Title.Alignment = taCenter
Title.Caption = #21830#21697#21517#31216
Width = 180
Visible = True
end
item
Expanded = False
FieldName = 'stock_amount'
Title.Alignment = taCenter
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -