D7snShanfengT/山峰贸易管理/U_JGSXCKInPut.dfm
DESKTOP-E401PHE\Administrator c363cb75a7 调整之后的山凤水泥厂
2026-02-26 09:41:35 +08:00

668 lines
16 KiB
Plaintext

object frmJGSXCKInPut: TfrmJGSXCKInPut
Left = 190
Top = 133
Width = 1053
Height = 620
Align = alClient
Caption = #21407#26009#20837#24211
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
WindowState = wsMaximized
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 107
TextHeight = 13
object cxGrid2: TcxGrid
Left = 0
Top = 217
Width = 1037
Height = 363
Align = alClient
TabOrder = 0
object Tv1: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
DataController.DataSource = DataSource3
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skCount
end
item
Kind = skSum
end
item
Kind = skSum
Column = v2Qty
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsData.Editing = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Inactive = DataLink_TradeManage.SHuangSe
Styles.IncSearch = DataLink_TradeManage.SHuangSe
Styles.Selection = DataLink_TradeManage.SHuangSe
Styles.Header = DataLink_TradeManage.Default
object v1CRTime: TcxGridDBColumn
Tag = 2
Caption = #20837#24211#26085#26399
DataBinding.FieldName = 'CRTime'
PropertiesClassName = 'TcxDateEditProperties'
Properties.SaveTime = False
Properties.ShowTime = False
HeaderAlignmentHorz = taCenter
Width = 93
end
object v1CRType: TcxGridDBColumn
Tag = 2
Caption = #20837#24211#31867#22411
DataBinding.FieldName = 'CRType'
PropertiesClassName = 'TcxComboBoxProperties'
Properties.DropDownListStyle = lsFixedList
Properties.Items.Strings = (
#37319#36141#20837#24211
#26399#21021#20837#24211)
HeaderAlignmentHorz = taCenter
Width = 87
end
object v1FactoryName: TcxGridDBColumn
Tag = 2
Caption = #20379#24212#21830
DataBinding.FieldName = 'FactoryName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Alignment.Horz = taLeftJustify
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column14PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 87
end
object v1YLName: TcxGridDBColumn
Tag = 2
Caption = #21407#26009#21517#31216
DataBinding.FieldName = 'YLName'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column5PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 79
end
object v1Chedui: TcxGridDBColumn
Tag = 2
Caption = #36710#38431
DataBinding.FieldName = 'Chedui'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 73
end
object v2Qty: TcxGridDBColumn
Tag = 2
Caption = #25968#37327
DataBinding.FieldName = 'Qty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v2Column6PropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 85
end
object v1QtyUnit: TcxGridDBColumn
Tag = 2
Caption = #25968#37327#21333#20301
DataBinding.FieldName = 'QtyUnit'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.OnButtonClick = v1Column3PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 66
end
object v1TuoBie: TcxGridDBColumn
Tag = 2
Caption = #30780#21035
DataBinding.FieldName = 'TuoBie'
PropertiesClassName = 'TcxTextEditProperties'
Properties.OnEditValueChanged = v1PricePropertiesEditValueChanged
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1DunWei: TcxGridDBColumn
Tag = 2
Caption = #21544#20301
DataBinding.FieldName = 'DunWei'
HeaderAlignmentHorz = taCenter
Width = 70
end
object v1Note: TcxGridDBColumn
Tag = 2
Caption = #22791#27880
DataBinding.FieldName = 'Note'
HeaderAlignmentHorz = taCenter
Width = 85
end
end
object cxGrid2Level1: TcxGridLevel
GridView = Tv1
end
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1037
Height = 33
ButtonHeight = 30
ButtonWidth = 59
Caption = 'ToolBar1'
Color = clSkyBlue
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_TradeManage.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 1
object TBSave: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 14
OnClick = TBSaveClick
end
object TBClose: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 55
OnClick = TBCloseClick
end
end
object Panel1: TPanel
Left = 0
Top = 33
Width = 1037
Height = 184
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object Label17: TLabel
Left = 50
Top = 22
Width = 80
Height = 15
Caption = #20837#24211#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 303
Top = 22
Width = 80
Height = 15
Caption = #20837#24211#31867#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 550
Top = 22
Width = 82
Height = 15
Caption = #20379' '#24212' '#21830#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 50
Top = 55
Width = 80
Height = 15
Caption = #21407#26009#21517#31216#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 303
Top = 55
Width = 84
Height = 15
Caption = #25968' '#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 550
Top = 55
Width = 80
Height = 15
Caption = #36816#36153#21333#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 50
Top = 119
Width = 84
Height = 15
Caption = #30780' '#21035#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 303
Top = 119
Width = 84
Height = 15
Caption = #21544' '#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 50
Top = 151
Width = 84
Height = 15
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 550
Top = 151
Width = 84
Height = 15
Caption = #36710' '#38431#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label9: TLabel
Left = 50
Top = 87
Width = 80
Height = 15
Caption = #21407#26009#20840#31216#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 550
Top = 87
Width = 80
Height = 15
Caption = #30331#35760#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 743
Top = 55
Width = 18
Height = 15
Caption = '/T'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 550
Top = 119
Width = 80
Height = 15
Caption = #21040#36135#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label13: TLabel
Left = 303
Top = 87
Width = 84
Height = 15
Caption = #36710' '#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object FactoryName: TBtnEditA
Left = 624
Top = 18
Width = 139
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 0
OnBtnClick = FactoryNameBtnClick
end
object CRType: TBtnEditA
Left = 379
Top = 18
Width = 143
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnBtnClick = CRTypeBtnClick
end
object CRTime: TDateTimePicker
Left = 126
Top = 18
Width = 149
Height = 23
Date = 43182.612726747680000000
Time = 43182.612726747680000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
object YLName: TBtnEditA
Left = 126
Top = 51
Width = 148
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
OnBtnClick = YLNameBtnClick
end
object Qty: TEdit
Left = 379
Top = 49
Width = 100
Height = 26
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -18
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
Text = '0'
end
object QtyUnit: TBtnEditA
Left = 480
Top = 51
Width = 41
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
Text = 'T'
OnBtnClick = QtyUnitBtnClick
end
object DunWei: TEdit
Left = 379
Top = 116
Width = 142
Height = 21
TabOrder = 6
end
object Note: TEdit
Left = 126
Top = 147
Width = 395
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
end
object CheckBox1: TCheckBox
Tag = 1
Left = 922
Top = 187
Width = 97
Height = 17
Caption = #33258#21160#21462#20540
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
Visible = False
end
object CheDui: TBtnEditA
Left = 624
Top = 147
Width = 139
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 9
OnBtnClick = CheDuiBtnClick
end
object YLQName: TBtnEditA
Left = 126
Top = 83
Width = 148
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 10
OnBtnClick = YLQNameBtnClick
end
object Tuobie: TBtnEditA
Left = 126
Top = 115
Width = 148
Height = 23
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 11
OnBtnClick = TuobieBtnClick
end
object filltime: TDateTimePicker
Left = 624
Top = 83
Width = 139
Height = 23
Date = 43182.612726747680000000
Time = 43182.612726747680000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 12
end
object YFPrice: TEdit
Left = 624
Top = 50
Width = 118
Height = 26
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -18
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 13
Text = '0'
end
object DHDate: TDateTimePicker
Left = 624
Top = 115
Width = 139
Height = 23
Date = 43182.612726747680000000
Time = 43182.612726747680000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 14
end
object CheQty: TEdit
Left = 379
Top = 84
Width = 142
Height = 21
TabOrder = 15
end
end
object DataSource3: TDataSource
DataSet = CDS_Sub
Left = 509
Top = 290
end
object CDS_Sub: TClientDataSet
Aggregates = <>
Params = <>
Left = 477
Top = 290
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_TradeManage.ADOLink
Parameters = <>
Left = 341
Top = 290
end
object ADOQueryMain: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 368
Top = 290
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_TradeManage.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 405
Top = 290
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 443
Top = 289
end
end