D7myYunxiang/云翔生产管理(MYSC.dll)/U_JGCKInPut.dfm

1040 lines
26 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 13:04:03 +08:00
object frmJGCKInPut: TfrmJGCKInPut
Left = 394
Top = 48
Width = 1172
Height = 835
Caption = #21152#24037#20986#24211
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 120
TextHeight = 19
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 1154
Height = 30
ButtonHeight = 30
ButtonWidth = 123
Caption = 'ToolBar1'
Color = clBtnFace
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = #23435#20307
Font.Style = [fsBold]
Images = DataLink_MYSC.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object Label26: TLabel
Left = 0
Top = 0
Width = 36
Height = 30
Caption = ' '
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object TBSave: TToolButton
Left = 36
Top = 0
AutoSize = True
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object ToolButton1: TToolButton
Left = 119
Top = 0
Caption = #36873#25321#25968#25454
ImageIndex = 22
OnClick = ToolButton1Click
end
object Panel2: TPanel
Left = 242
Top = 0
Width = 185
Height = 30
BevelOuter = bvNone
TabOrder = 0
end
object labMYType: TLabel
Left = 427
Top = 0
Width = 240
Height = 30
Caption = ' '
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -29
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Panel6: TPanel
Left = 667
Top = 0
Width = 185
Height = 30
BevelOuter = bvNone
TabOrder = 1
end
object TBClose: TToolButton
Left = 852
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel3: TPanel
Left = 0
Top = 30
Width = 1154
Height = 758
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Panel4: TPanel
Left = 2
Top = 2
Width = 1150
Height = 312
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object Label13: TLabel
Left = 522
Top = 19
Width = 93
Height = 22
Caption = #26085' '#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label33: TLabel
Left = 44
Top = 19
Width = 116
Height = 22
Caption = #21152' '#24037' '#21378#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
Left = 42
Top = 72
Width = 117
Height = 22
Caption = #21697' '#21517#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label12: TLabel
Left = 818
Top = 138
Width = 117
Height = 22
Caption = #20811' '#37325#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label14: TLabel
Left = 522
Top = 138
Width = 93
Height = 22
Caption = #38376' '#24133#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label15: TLabel
Left = 755
Top = 138
Width = 24
Height = 22
Caption = 'CM'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label16: TLabel
Left = 1059
Top = 138
Width = 47
Height = 22
Caption = 'g/'#13217
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 818
Top = 19
Width = 117
Height = 22
Caption = #33457' '#22411#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label11: TLabel
Left = 522
Top = 72
Width = 93
Height = 22
Caption = #39068' '#33394#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 818
Top = 72
Width = 117
Height = 22
Caption = #33394' '#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label1: TLabel
Left = 44
Top = 260
Width = 117
Height = 22
Caption = #22791' '#27880#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 524
Top = 260
Width = 115
Height = 22
Caption = #25910#36135#21333#20301#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 44
Top = 200
Width = 105
Height = 22
Caption = #23458' '#25143#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 522
Top = 203
Width = 92
Height = 22
Caption = #21512#21516#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
Left = 818
Top = 203
Width = 115
Height = 22
Caption = #25351#31034#21333#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = 42
Top = 138
Width = 138
Height = 22
Caption = #22383#24067#32852#31995#21495#65306
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CRTime: TDateTimePicker
Tag = 2
Left = 599
Top = 15
Width = 183
Height = 30
Date = 42459.000000000000000000
Time = 42459.000000000000000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object GYSName: TBtnEditA
Tag = 2
Left = 142
Top = 17
Width = 346
Height = 32
Hint = 'GYSNo'
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 1
OnBtnClick = GYSNameBtnClick
end
object MYName: TEdit
Tag = 2
Left = 143
Top = 72
Width = 340
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object MYKZ: TEdit
Tag = 2
Left = 915
Top = 137
Width = 140
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
end
object MYMF: TEdit
Tag = 2
Left = 599
Top = 137
Width = 143
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 4
end
object MYHX: TEdit
Tag = 2
Left = 915
Top = 18
Width = 174
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
end
object MYColor: TEdit
Tag = 2
Left = 599
Top = 71
Width = 177
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 6
end
object MYColorNo: TEdit
Tag = 2
Left = 915
Top = 71
Width = 177
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 7
end
object Note: TEdit
Tag = 2
Left = 143
Top = 256
Width = 346
Height = 31
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -23
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
end
object ToGYSName: TBtnEditA
Tag = 2
Left = 622
Top = 255
Width = 471
Height = 32
Hint = 'ToGYSNo'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 9
OnBtnClick = ToGYSNameBtnClick
end
object KHNameJC: TBtnEditA
Left = 142
Top = 198
Width = 346
Height = 32
Hint = 'ToGYSNo'
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 10
OnBtnClick = KHNameJCBtnClick
end
object MLConNo: TEdit
Left = 599
Top = 199
Width = 177
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 11
end
object PBBatchNo: TEdit
Tag = 2
Left = 172
Top = 135
Width = 310
Height = 30
Color = clScrollBar
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 12
end
object MLOrderNo: TcxButtonEdit
Left = 915
Top = 199
ParentFont = False
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = MLOrderNoPropertiesButtonClick
Style.Color = clScrollBar
Style.Font.Charset = GB2312_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -22
Style.Font.Name = #23435#20307
Style.Font.Style = [fsBold]
Style.IsFontAssigned = True
TabOrder = 13
Width = 178
end
end
object Panel5: TPanel
Left = 2
Top = 314
Width = 1150
Height = 77
Align = alTop
TabOrder = 1
object Label31: TLabel
Left = 318
Top = 29
Width = 115
Height = 22
Caption = #20986#24211#24635#25968#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label32: TLabel
Left = 481
Top = 29
Width = 23
Height = 22
Caption = #21305
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label23: TLabel
Left = 285
Top = 483
Width = 57
Height = 18
Caption = #21333#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label24: TLabel
Left = 1386
Top = -20
Width = 57
Height = 18
Caption = #21333#20215#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
end
object Label45: TLabel
Left = 618
Top = 29
Width = 23
Height = 22
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label50: TLabel
Left = 750
Top = 29
Width = 46
Height = 22
Caption = #20844#26020
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label43: TLabel
Left = 46
Top = 29
Width = 104
Height = 22
Caption = #35745#20215#26041#24335':'
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object PS: TEdit
Tag = 2
Left = 412
Top = 28
Width = 63
Height = 30
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object Qty: TEdit
Tag = 2
Left = 519
Top = 28
Width = 94
Height = 30
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object KgQty: TEdit
Tag = 2
Left = 652
Top = 28
Width = 92
Height = 30
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object Panel7: TPanel
Left = 1543
Top = 255
Width = 125
Height = 229
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
Visible = False
object Panel1: TPanel
Left = 11
Top = 11
Width = 103
Height = 203
BevelInner = bvRaised
TabOrder = 0
object Label20: TLabel
Left = 34
Top = 22
Width = 28
Height = 162
Caption = #26126#13#10#32454#13#10#30721#13#10#21333#13#10#24405#13#10#20837
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -27
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
end
end
object PTID: TEdit
Tag = 2
Left = 1648
Top = 328
Width = 91
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
Visible = False
end
object MYPrice: TEdit
Tag = 2
Left = 338
Top = 480
Width = 53
Height = 25
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
Visible = False
end
object MDMFlag: TCheckBox
Left = 144
Top = 23
Width = 65
Height = 33
Caption = #31859
Checked = True
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
State = cbChecked
TabOrder = 6
OnClick = MDMFlagClick
end
object MDKGFlag: TCheckBox
Left = 219
Top = 23
Width = 88
Height = 33
Caption = #20844#26020
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -22
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = MDKGFlagClick
end
end
object Panel8: TPanel
Left = 2
Top = 391
Width = 1150
Height = 365
Align = alClient
Caption = 'Panel8'
TabOrder = 2
object Panel9: TPanel
Left = 1
Top = 1
Width = 400
Height = 363
Align = alLeft
TabOrder = 0
object Label18: TLabel
Left = 32
Top = 24
Width = 234
Height = 25
Caption = #27880#65306#36755#20837#25968#37327#25970#22238#36710
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -25
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label19: TLabel
Left = 32
Top = 96
Width = 130
Height = 25
Caption = #26126#32454#25968#37327#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -25
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Edit1: TEdit
Left = 152
Top = 91
Width = 121
Height = 35
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -27
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnKeyPress = Edit1KeyPress
end
end
object cxGrid1: TcxGrid
Left = 401
Top = 1
Width = 748
Height = 363
Align = alClient
TabOrder = 1
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
OnCellDblClick = Tv1CellDblClick
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Format = #20010#25968':##'
Kind = skCount
end
item
Kind = skSum
end
item
Kind = skSum
Column = v1Column11
end
item
Kind = skSum
Column = Tv1Column1
end
item
Kind = skSum
Column = Tv1Column2
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Content = DataLink_MYSC.Default10
Styles.Footer = DataLink_MYSC.Default10
Styles.Header = DataLink_MYSC.Default10
object v1Column11: TcxGridDBColumn
Caption = #26126#32454#25968#37327#65288#31859#65289
DataBinding.FieldName = 'MQty'
PropertiesClassName = 'TcxTextEditProperties'
Properties.ReadOnly = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 247
end
object Tv1Column1: TcxGridDBColumn
Caption = #26126#32454#25968#37327#65288#20844#26020#65289
DataBinding.FieldName = 'KgQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 181
end
object Tv1Column2: TcxGridDBColumn
Caption = #26680#31639#25968#37327
DataBinding.FieldName = 'HSQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Styles.Content = cxStyle1
Styles.Footer = cxStyle1
Styles.Header = cxStyle1
Width = 161
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
end
end
object ADOTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 766
Top = 493
end
object ADOCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 726
Top = 487
end
object ADOQuery1: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 730
Top = 532
end
object DataSource1: TDataSource
DataSet = ClientDataSet1
Left = 802
Top = 527
end
object ClientDataSet1: TClientDataSet
Aggregates = <>
Params = <>
Left = 839
Top = 493
end
object PopupMenu2: TPopupMenu
Left = 238
Top = 792
object MenuItem1: TMenuItem
Caption = #19978#20256
end
object N3: TMenuItem
Caption = #21024#38500
end
object MenuItem2: TMenuItem
Caption = #37325#21629#21517
end
object N4: TMenuItem
Caption = #21478#23384#20026
end
end
object ImageList1: TImageList
Height = 32
ShareImages = True
Width = 32
Left = 170
Top = 799
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 285
Top = 793
end
object ADOQueryTmp: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 110
Top = 784
end
object ADOQuery2: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 765
Top = 532
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 810
Top = 492
end
object cxStyleRepository1: TcxStyleRepository
Left = 368
Top = 8
PixelsPerInch = 120
object cxStyle1: TcxStyle
AssignedValues = [svFont]
Font.Charset = ANSI_CHARSET
Font.Color = clBlack
Font.Height = -18
Font.Name = #23435#20307
Font.Style = [fsBold]
end
end
end