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

1053 lines
26 KiB
Plaintext
Raw Permalink Normal View History

2025-01-20 13:04:03 +08:00
object frmLLRKMXInPut: TfrmLLRKMXInPut
Left = 478
2025-07-12 13:15:31 +08:00
Top = 184
2025-01-20 13:04:03 +08:00
Width = 1349
Height = 653
Caption = #26469#26009#26126#32454#30721#21333#24405#20837
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
2025-07-05 15:14:36 +08:00
PixelsPerInch = 96
TextHeight = 15
2025-01-20 13:04:03 +08:00
object ToolBar1: TToolBar
Left = 0
Top = 0
2025-07-05 15:14:36 +08:00
Width = 1341
2025-01-20 13:04:03 +08:00
Height = 30
ButtonHeight = 30
ButtonWidth = 79
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
Caption = #20445#23384
ImageIndex = 5
OnClick = TBSaveClick
end
object Label19: TLabel
Left = 115
Top = 0
Width = 384
Height = 30
Caption = ' '
end
object labMYType: TLabel
Left = 499
Top = 0
Width = 180
Height = 30
Caption = #26469#26009#26126#32454#30721#21333
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -29
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label21: TLabel
Left = 679
Top = 0
Width = 432
Height = 30
Caption = ' '
end
object TBClose: TToolButton
Left = 1111
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
object Panel3: TPanel
Left = 0
Top = 30
2025-07-05 15:14:36 +08:00
Width = 377
Height = 592
2025-01-20 13:04:03 +08:00
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Label13: TLabel
2025-07-05 15:14:36 +08:00
Left = 574
Top = 30
Width = 80
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #20837#24211#26085#26399#65306
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object CRTime: TDateTimePicker
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 654
Top = 27
Width = 126
Height = 21
2025-01-20 13:04:03 +08:00
Date = 42459.000000000000000000
Time = 42459.000000000000000000
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object cxGroupBox1: TcxGroupBox
Left = 2
Top = 2
Align = alClient
Caption = #32454#30721#21333#24405#20837#8594#36755#20837#27599#21367#25968#37327#25970#22238#36710
ParentColor = False
ParentFont = False
Style.Color = clBtnFace
Style.Font.Charset = GB2312_CHARSET
Style.Font.Color = clBlue
2025-07-05 15:14:36 +08:00
Style.Font.Height = -20
2025-01-20 13:04:03 +08:00
Style.Font.Name = #24494#36719#38597#40657
Style.Font.Style = [fsBold]
Style.IsFontAssigned = True
TabOrder = 1
2025-07-05 15:14:36 +08:00
Height = 588
Width = 373
2025-01-20 13:04:03 +08:00
object Label7: TLabel
2025-07-05 15:14:36 +08:00
Left = 38
Top = 224
Width = 76
Height = 27
2025-01-20 13:04:03 +08:00
Caption = #25968' '#37327
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = []
ParentFont = False
end
object Label9: TLabel
2025-07-05 15:14:36 +08:00
Left = 163
Top = 173
Width = 20
Height = 27
2025-01-20 13:04:03 +08:00
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label10: TLabel
2025-07-05 15:14:36 +08:00
Left = 163
Top = 284
Width = 40
Height = 27
2025-01-20 13:04:03 +08:00
Caption = #20844#26020
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
end
object Label22: TLabel
2025-07-05 15:14:36 +08:00
Left = 38
Top = 71
Width = 80
Height = 27
2025-01-20 13:04:03 +08:00
Caption = #20837#24211#32568#21495
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = []
ParentFont = False
end
object QtyLRM: TEdit
2025-07-05 15:14:36 +08:00
Left = 226
Top = 169
Width = 72
2025-07-12 13:15:31 +08:00
Height = 35
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
Visible = False
OnKeyPress = QtyLRMKeyPress
end
object UnitM: TEdit
2025-07-05 15:14:36 +08:00
Left = 125
Top = 160
Width = 36
2025-07-12 13:15:31 +08:00
Height = 54
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -35
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 1
OnClick = UnitMClick
end
object UnitKg: TEdit
2025-07-05 15:14:36 +08:00
Left = 125
Top = 271
Width = 36
2025-07-12 13:15:31 +08:00
Height = 54
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -35
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
OnClick = UnitKgClick
end
object RCGangNo: TEdit
2025-07-05 15:14:36 +08:00
Left = 125
Top = 67
Width = 174
2025-07-12 13:15:31 +08:00
Height = 35
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object QtyLRKg: TEdit
2025-07-05 15:14:36 +08:00
Left = 226
Top = 281
Width = 72
2025-07-12 13:15:31 +08:00
Height = 35
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -20
2025-01-20 13:04:03 +08:00
Font.Name = #24494#36719#38597#40657
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
Visible = False
OnKeyPress = QtyLRKgKeyPress
end
object BtnM: TButton
2025-07-05 15:14:36 +08:00
Left = 304
Top = 169
Width = 51
Height = 35
2025-01-20 13:04:03 +08:00
Caption = #30830#35748
TabOrder = 5
Visible = False
OnClick = BtnMClick
end
object BtnKg: TButton
2025-07-05 15:14:36 +08:00
Left = 304
Top = 281
Width = 51
Height = 35
2025-01-20 13:04:03 +08:00
Caption = #30830#35748
TabOrder = 6
Visible = False
OnClick = BtnKgClick
end
end
object MYType: TBtnEditA
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 616
Top = 179
Width = 100
2025-07-12 13:15:31 +08:00
Height = 23
2025-01-20 13:04:03 +08:00
Hint = 'MYTypeFlag'
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object MLID: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 614
Top = 90
Width = 123
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 3
end
object BPID: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 614
Top = 122
Width = 123
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 4
end
object DYID: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 614
Top = 58
Width = 123
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
end
object PTID: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 614
Top = 154
Width = 123
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
end
end
object Panel1: TPanel
2025-07-05 15:14:36 +08:00
Left = 377
2025-01-20 13:04:03 +08:00
Top = 30
2025-07-05 15:14:36 +08:00
Width = 964
Height = 592
2025-01-20 13:04:03 +08:00
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object Panel2: TPanel
Left = 2
Top = 2
2025-07-05 15:14:36 +08:00
Width = 960
Height = 41
2025-01-20 13:04:03 +08:00
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 0
object Label4: TLabel
2025-07-05 15:14:36 +08:00
Left = 27
Top = 12
Width = 34
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #32568#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
2025-07-05 15:14:36 +08:00
Left = 125
Top = 12
Width = 34
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #21305#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
2025-07-05 15:14:36 +08:00
Left = 220
Top = 12
Width = 51
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #20844#26020#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
2025-07-05 15:14:36 +08:00
Left = 446
Top = 12
Width = 34
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #31859#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label25: TLabel
2025-07-05 15:14:36 +08:00
Left = 338
Top = 12
Width = 34
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #22343#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
2025-07-05 15:14:36 +08:00
Left = 548
Top = 12
Width = 34
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #22343#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object GangQty: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 63
Top = 9
Width = 36
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 0
end
object MXHZPS: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 160
Top = 9
Width = 36
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 1
end
object MXHZKGQty: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 272
Top = 9
Width = 64
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
end
object MXHZQty: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 482
Top = 9
Width = 64
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
end
object BtnDel: TButton
2025-07-05 15:14:36 +08:00
Left = 712
Top = 8
Width = 40
Height = 25
2025-01-20 13:04:03 +08:00
Caption = #21024#38500
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = BtnDelClick
end
object KgQtyAvg: TEdit
Tag = 99
2025-07-05 15:14:36 +08:00
Left = 372
Top = 9
Width = 49
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
end
object QtyAvg: TEdit
Tag = 99
2025-07-05 15:14:36 +08:00
Left = 582
Top = 9
Width = 49
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Color = clMenuBar
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 6
end
object Button3: TButton
2025-07-05 15:14:36 +08:00
Left = 648
Top = 8
Width = 40
Height = 25
2025-01-20 13:04:03 +08:00
Caption = #25171#21360
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = Button3Click
end
end
object cxGrid1: TcxGrid
Left = 2
2025-07-05 15:14:36 +08:00
Top = 43
Width = 960
Height = 483
2025-01-20 13:04:03 +08:00
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
PopupMenu = PopupMenu1
TabOrder = 1
object Tv1: TcxGridDBTableView
2025-07-05 15:14:36 +08:00
Navigator.Buttons.CustomButtons = <>
2025-01-20 13:04:03 +08:00
OnCellDblClick = Tv1CellDblClick
DataController.DataSource = DataSource1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Format = '0.0'
Kind = skSum
Column = v1Column17
end
item
Format = '0.0'
Kind = skSum
Column = v1Column3
end
item
Kind = skCount
Column = v1Column1
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
Styles.Content = DataLink_MYSC.Default10
Styles.Inactive = DataLink_MYSC.FontBlue11
Styles.IncSearch = DataLink_MYSC.FontBlue11
Styles.Selection = DataLink_MYSC.FontBlue11
Styles.Header = DataLink_MYSC.Default10
object v1Column4: TcxGridDBColumn
Caption = #36873#20013
DataBinding.FieldName = 'SSel'
PropertiesClassName = 'TcxCheckBoxProperties'
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
HeaderAlignmentHorz = taCenter
Width = 46
end
object v1Column6: TcxGridDBColumn
Caption = #20837#24211#32568#21495
DataBinding.FieldName = 'RCGangNo'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Width = 127
end
object v1Column2: TcxGridDBColumn
Caption = #31995#32479#32568#21495
DataBinding.FieldName = 'GangNo'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Focusing = False
2025-07-05 15:14:36 +08:00
VisibleForCustomization = False
2025-01-20 13:04:03 +08:00
Width = 101
end
object v1Column1: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'JH'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Footer = DataLink_MYSC.Default10
Width = 74
end
object v1Column17: TcxGridDBColumn
Caption = #20844#26020#25968
DataBinding.FieldName = 'KgQty'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Focusing = False
Styles.Footer = DataLink_MYSC.Default10
Width = 113
end
object v1Column3: TcxGridDBColumn
Caption = #31859#25968
DataBinding.FieldName = 'MQty'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Styles.Footer = DataLink_MYSC.Default10
Width = 100
end
object v1Column7: TcxGridDBColumn
Caption = #25805#20316#26597#30475
DataBinding.FieldName = 'Laster'
PropertiesClassName = 'TcxButtonEditProperties'
Properties.Buttons = <
item
Default = True
Kind = bkEllipsis
end>
Properties.ReadOnly = True
Properties.OnButtonClick = v1Column7PropertiesButtonClick
HeaderAlignmentHorz = taCenter
Width = 79
end
end
object cxGrid1Level1: TcxGridLevel
GridView = Tv1
end
end
object Panel4: TPanel
Left = 2
2025-07-05 15:14:36 +08:00
Top = 526
Width = 960
Height = 64
2025-01-20 13:04:03 +08:00
Align = alBottom
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 2
Visible = False
object Label23: TLabel
2025-07-05 15:14:36 +08:00
Left = 357
Top = 22
Width = 51
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #20844#26020#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label24: TLabel
2025-07-05 15:14:36 +08:00
Left = 495
Top = 22
Width = 34
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #31859#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
2025-07-05 15:14:36 +08:00
Left = 181
Top = 22
Width = 68
Height = 16
2025-01-20 13:04:03 +08:00
Caption = #20837#24211#32568#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -16
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object KgQty1: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 409
Top = 19
Width = 69
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object MQty1: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 530
Top = 19
Width = 70
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object Button6: TButton
2025-07-05 15:14:36 +08:00
Left = 628
Top = 14
Width = 61
Height = 33
2025-01-20 13:04:03 +08:00
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button6Click
end
object RCGangNO1: TEdit
Tag = 2
2025-07-05 15:14:36 +08:00
Left = 249
Top = 19
Width = 85
2025-07-12 13:15:31 +08:00
Height = 21
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -13
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object Button1: TButton
2025-07-05 15:14:36 +08:00
Left = 55
Top = 14
Width = 105
Height = 33
2025-01-20 13:04:03 +08:00
Caption = #25209#37327#26356#25913#32568#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = Button1Click
end
end
object Panel5: TPanel
2025-07-05 15:14:36 +08:00
Left = 498
Top = 65
Width = 288
Height = 236
2025-01-20 13:04:03 +08:00
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 3
Visible = False
object Label28: TLabel
2025-07-05 15:14:36 +08:00
Left = 65
Top = 46
Width = 50
Height = 24
2025-01-20 13:04:03 +08:00
Caption = #24352#25968
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -24
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label29: TLabel
2025-07-05 15:14:36 +08:00
Left = 65
Top = 110
Width = 50
Height = 24
2025-01-20 13:04:03 +08:00
Caption = #23610#23544
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -24
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label30: TLabel
2025-07-05 15:14:36 +08:00
Left = 110
Top = 11
Width = 64
Height = 15
2025-01-20 13:04:03 +08:00
Caption = #26631#31614#25171#21360
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object ComboBox2: TComboBox
2025-07-05 15:14:36 +08:00
Left = 117
Top = 42
Width = 93
Height = 32
2025-01-20 13:04:03 +08:00
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -24
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
2025-07-05 15:14:36 +08:00
ItemHeight = 24
2025-01-20 13:04:03 +08:00
ItemIndex = 0
ParentFont = False
TabOrder = 0
Text = '1'
Items.Strings = (
'1'
'2'
'3')
end
object ComboBox1: TComboBox
2025-07-05 15:14:36 +08:00
Left = 117
Top = 106
Width = 93
Height = 32
2025-01-20 13:04:03 +08:00
Style = csDropDownList
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -24
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
2025-07-05 15:14:36 +08:00
ItemHeight = 24
2025-01-20 13:04:03 +08:00
ParentFont = False
TabOrder = 1
Items.Strings = (
'8*5'
'9*7')
end
object BtnPrt: TButton
2025-07-05 15:14:36 +08:00
Left = 189
Top = 168
Width = 80
Height = 50
2025-01-20 13:04:03 +08:00
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -33
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BtnPrtClick
end
object BtnQX: TButton
2025-07-05 15:14:36 +08:00
Left = 22
Top = 168
Width = 80
Height = 50
2025-01-20 13:04:03 +08:00
Caption = #21462#28040
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
2025-07-05 15:14:36 +08:00
Font.Height = -33
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = BtnQXClick
end
end
end
object Panel16: TPanel
2025-07-05 15:14:36 +08:00
Left = 448
Top = 230
Width = 249
Height = 30
2025-01-20 13:04:03 +08:00
BevelOuter = bvNone
Caption = #27491#22312#20445#23384#25968#25454#65292#35831#31245#21518#12290#12290#12290
Color = clSkyBlue
Font.Charset = GB2312_CHARSET
Font.Color = clRed
2025-07-05 15:14:36 +08:00
Font.Height = -15
2025-01-20 13:04:03 +08:00
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
Visible = False
end
object ADOTemp: TADOQuery
Connection = DataLink_MYSC.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 744
Top = 317
end
object ADOCmd: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 680
Top = 317
end
object ADOQuery1: TADOQuery
Connection = DataLink_MYSC.ADOLink
Parameters = <>
Left = 712
Top = 317
end
object DataSource1: TDataSource
DataSet = ClientDataSet1
Left = 648
Top = 320
end
object ClientDataSet1: TClientDataSet
Aggregates = <>
Params = <>
Left = 624
Top = 320
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 592
Top = 320
end
object RM1: TRMGridReport
ThreadPrepareReport = True
InitialZoom = pzDefault
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator]
DefaultCollate = False
ShowPrintDialog = False
SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\'
PreviewOptions.RulerUnit = rmutScreenPixels
PreviewOptions.RulerVisible = False
PreviewOptions.DrawBorder = False
PreviewOptions.BorderPen.Color = clGray
PreviewOptions.BorderPen.Style = psDash
Dataset = RMDB_Main
CompressLevel = rmzcFastest
CompressThread = False
LaterBuildEvents = True
OnlyOwnerDataSet = False
Left = 770
Top = 318
ReportData = {}
end
object CDS_Print: TClientDataSet
Aggregates = <>
Params = <>
Left = 808
Top = 326
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = CDS_Print
Left = 842
Top = 327
end
object PopupMenu1: TPopupMenu
Left = 529
Top = 318
object N1: TMenuItem
Caption = #20840#36873
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20840#24323
OnClick = N2Click
end
end
end