stocksinglecheckfrm.~dfm
来自「群星医药系统源码」· ~DFM 代码 · 共 1,403 行 · 第 1/5 页
~DFM
1,403 行
HotTrackColor = 3983359
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 13
ImageIndex = 13
Images = ImageList1
end
object cbFilter: TRzComboBox
Left = 656
Top = 64
Width = 121
Height = 20
Style = csDropDownList
Ctl3D = False
FlatButtons = True
FrameVisible = True
ItemHeight = 12
ParentCtl3D = False
TabOnEnter = True
TabOrder = 8
Text = #26410#32467#31639
OnClick = cbFilterClick
Items.Strings = (
#20840#37096#26174#31034
#24050#32467#31639
#26410#32467#31639)
ItemIndex = 2
end
object edUnits: TRzDBComboBox
Left = 656
Top = 36
Width = 121
Height = 20
DataField = 'Unit'
DataSource = DataSource1
Ctl3D = False
FlatButtons = True
FrameVisible = True
ItemHeight = 12
ParentCtl3D = False
TabOnEnter = True
TabOrder = 5
end
object btnSave: TRzBitBtn
Left = 87
Top = 102
Width = 70
Caption = #20445#23384'&S'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 14
OnClick = btnSaveClick
ImageIndex = 12
Images = ImageList1
end
object btnCancel: TRzBitBtn
Left = 159
Top = 102
Width = 70
Hint = #21462#28040#19978#27425#20445#23384#20043#21518#30340#25152#26377#26356#25913
Caption = #21462#28040'&C'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 15
OnClick = btnCancelClick
ImageIndex = 28
Images = ImageList1
end
object btnRefresh: TRzBitBtn
Left = 231
Top = 102
Width = 70
Hint = #21047#26032#25968#25454
Caption = #21047#26032'&R'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 16
OnClick = btnRefreshClick
ImageIndex = 18
Images = ImageList1
end
object RzBitBtn3: TRzBitBtn
Left = 375
Top = 102
Width = 70
Action = ActPrint
Caption = #25171#21360'&P'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 17
ImageIndex = 7
Images = ImageList1
end
object btnPreview: TRzBitBtn
Left = 491
Top = 102
Width = 90
Hint = #39044#35272#21333#21697#30424#28857#30408#20111
Caption = #39044#35272#30408#20111'&V'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 18
OnClick = btnPreviewClick
ImageIndex = 6
Images = ImageList1
end
object RzBitBtn4: TRzBitBtn
Left = 583
Top = 102
Width = 90
Action = ActAudit
Caption = #23436#25104#30424#28857'&A'
Color = 15791348
HighlightColor = 16026986
HotTrack = True
HotTrackColor = 3983359
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 19
ImageIndex = 4
Images = ImageList1
end
object RzDBNavigator1: TRzDBNavigator
Left = 677
Top = 102
Width = 100
Height = 25
DataSource = DataSource1
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
TabOrder = 20
end
end
object RzPanel2: TRzPanel
Left = 0
Top = 0
Width = 788
Height = 365
Align = alClient
BorderOuter = fsFlat
ParentColor = True
TabOrder = 0
object Panel6: TRzPanel
Left = 1
Top = 1
Width = 786
Height = 363
Align = alClient
BorderOuter = fsNone
ParentColor = True
TabOrder = 0
object dbgStockSingleCheck: TxDBGridEh
Left = 0
Top = 0
Width = 786
Height = 355
Align = alClient
AllowedOperations = [alopUpdateEh, alopDeleteEh]
DataSource = DataSource1
Flat = True
FooterColor = clBtnFace
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghRowHighlight]
RowHeight = 16
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
TitleHeight = 15
OnEditButtonClick = dbgStockSingleCheckEditButtonClick
Columns = <
item
EditButtons = <>
FieldName = 'ItemNo'
Footers = <>
Title.Alignment = taCenter
Width = 34
end
item
ButtonStyle = cbsEllipsis
EditButtons = <>
FieldName = 'DepotNo'
Footers = <>
Title.Alignment = taCenter
Width = 54
end
item
ButtonStyle = cbsEllipsis
EditButtons = <>
FieldName = 'BerthNo'
Footers = <>
Title.Alignment = taCenter
Width = 55
end
item
ButtonStyle = cbsEllipsis
EditButtons = <>
FieldName = 'GoodsID'
Footers = <>
Title.Alignment = taCenter
Width = 72
end
item
EditButtons = <>
FieldName = 'Name'
Footers = <>
ReadOnly = True
Title.Alignment = taCenter
Width = 120
end
item
EditButtons = <>
FieldName = 'Specs'
Footers = <>
ReadOnly = True
Title.Alignment = taCenter
Width = 80
end
item
EditButtons = <>
FieldName = 'Qty'
Footers = <>
Title.Alignment = taCenter
Width = 52
end
item
EditButtons = <>
FieldName = 'Unit'
Footers = <>
ReadOnly = True
Title.Alignment = taCenter
Width = 28
end
item
ButtonStyle = cbsEllipsis
EditButtons = <>
FieldName = 'BatchNo'
Footers = <>
Title.Alignment = taCenter
Width = 72
end
item
EditButtons = <>
FieldName = 'GroupNo'
Footers = <>
Title.Alignment = taCenter
Width = 73
end
item
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?