D7szYidui/布匹检验(FabricInspection.dll)/U_GreyInspection.dfm
DESKTOP-E401PHE\Administrator ef99fc8b5e 移交
2025-07-19 09:32:10 +08:00

2766 lines
67 KiB
Plaintext

object frmGreyInspection: TfrmGreyInspection
Left = 168
Top = 28
Width = 1316
Height = 753
Caption = #26797#32455#22383#24067#26816#39564
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object ScrollBox1: TScrollBox
Left = 0
Top = 85
Width = 399
Height = 637
Align = alLeft
TabOrder = 1
object SpeedButton13: TSpeedButton
Left = 7
Top = 3
Width = 60
Height = 70
Caption = #23567#40657#28857
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton14: TSpeedButton
Left = 72
Top = 3
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton15: TSpeedButton
Left = 137
Top = 3
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton16: TSpeedButton
Left = 202
Top = 3
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton17: TSpeedButton
Left = 267
Top = 3
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton18: TSpeedButton
Left = 332
Top = 3
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton21: TSpeedButton
Left = 7
Top = 78
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton22: TSpeedButton
Left = 72
Top = 78
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton23: TSpeedButton
Left = 137
Top = 78
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton24: TSpeedButton
Left = 202
Top = 78
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton25: TSpeedButton
Left = 267
Top = 78
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton26: TSpeedButton
Left = 332
Top = 78
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton29: TSpeedButton
Left = 7
Top = 153
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton30: TSpeedButton
Left = 72
Top = 153
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton31: TSpeedButton
Left = 137
Top = 153
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton32: TSpeedButton
Left = 202
Top = 153
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton33: TSpeedButton
Left = 267
Top = 153
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton34: TSpeedButton
Left = 332
Top = 153
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton37: TSpeedButton
Left = 7
Top = 228
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton38: TSpeedButton
Left = 72
Top = 228
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton39: TSpeedButton
Left = 137
Top = 228
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton40: TSpeedButton
Left = 202
Top = 228
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton41: TSpeedButton
Left = 267
Top = 228
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton42: TSpeedButton
Left = 332
Top = 228
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton45: TSpeedButton
Left = 7
Top = 303
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton46: TSpeedButton
Left = 72
Top = 303
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton47: TSpeedButton
Left = 137
Top = 303
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton48: TSpeedButton
Left = 203
Top = 302
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton50: TSpeedButton
Left = 267
Top = 303
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton51: TSpeedButton
Left = 332
Top = 303
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton54: TSpeedButton
Left = 7
Top = 378
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton55: TSpeedButton
Left = 72
Top = 378
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton56: TSpeedButton
Left = 137
Top = 378
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton57: TSpeedButton
Left = 202
Top = 378
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton58: TSpeedButton
Left = 267
Top = 378
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton59: TSpeedButton
Left = 332
Top = 378
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton62: TSpeedButton
Left = 7
Top = 453
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton63: TSpeedButton
Left = 72
Top = 453
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton64: TSpeedButton
Left = 137
Top = 453
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton65: TSpeedButton
Left = 202
Top = 453
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton66: TSpeedButton
Left = 267
Top = 453
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton67: TSpeedButton
Left = 332
Top = 453
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton70: TSpeedButton
Left = 7
Top = 528
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton71: TSpeedButton
Left = 72
Top = 528
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton72: TSpeedButton
Left = 137
Top = 528
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton73: TSpeedButton
Left = 202
Top = 528
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton74: TSpeedButton
Left = 267
Top = 528
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton75: TSpeedButton
Left = 332
Top = 528
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton19: TSpeedButton
Left = 7
Top = 603
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton20: TSpeedButton
Left = 72
Top = 603
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton27: TSpeedButton
Left = 137
Top = 603
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton28: TSpeedButton
Left = 202
Top = 603
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton35: TSpeedButton
Left = 267
Top = 603
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object SpeedButton36: TSpeedButton
Left = 332
Top = 603
Width = 60
Height = 70
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
Visible = False
OnClick = SpeedButton13Click
end
object MovePanel1: TMovePanel
Left = 3
Top = 10
Width = 386
Height = 367
BevelInner = bvLowered
Color = clSkyBlue
TabOrder = 0
Visible = False
object Label7: TLabel
Left = 97
Top = 6
Width = 185
Height = 33
Caption = #8594'Label21'#8592
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label8: TLabel
Left = 347
Top = 119
Width = 34
Height = 33
Caption = #20803
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -33
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label17: TLabel
Left = -2
Top = 119
Width = 66
Height = 33
Caption = #26426#20462
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label18: TLabel
Left = 224
Top = 124
Width = 25
Height = 24
Caption = #8594
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label37: TLabel
Left = -2
Top = 221
Width = 66
Height = 33
Caption = #25377#36710
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label20: TLabel
Left = 350
Top = 185
Width = 34
Height = 33
Caption = #20803
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -33
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label38: TLabel
Left = 205
Top = 203
Width = 25
Height = 24
Caption = #8599
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label42: TLabel
Left = 351
Top = 246
Width = 34
Height = 33
Caption = #20803
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -33
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label43: TLabel
Left = 206
Top = 251
Width = 25
Height = 24
Caption = #8600
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label44: TLabel
Left = 224
Top = 195
Width = 50
Height = 24
Caption = #25187#27454
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label45: TLabel
Left = 226
Top = 257
Width = 50
Height = 24
Caption = #24320#26426
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label48: TLabel
Left = 2
Top = 63
Width = 66
Height = 33
Caption = #38271#24230
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label47: TLabel
Left = 167
Top = 67
Width = 34
Height = 33
Caption = #31859
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -33
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Button1: TButton
Left = 79
Top = 298
Width = 85
Height = 60
Caption = #30830#23450
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = Button1Click
end
object Button4: TButton
Left = 233
Top = 298
Width = 85
Height = 60
Caption = #21462#28040
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = Button4Click
end
object JXiuPrice: TEdit
Left = 253
Top = 113
Width = 90
Height = 53
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -45
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = ScanClick
end
object JXiuKouK: TEdit
Left = 64
Top = 113
Width = 145
Height = 53
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -45
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnClick = JXiuKouKClick
end
object DCheKouK: TEdit
Left = 65
Top = 215
Width = 141
Height = 53
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -45
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
OnClick = DCheKouKClick
end
object DChePrice: TEdit
Left = 275
Top = 179
Width = 76
Height = 53
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -45
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
OnClick = ScanClick
end
object DCGKaiJ: TEdit
Left = 276
Top = 241
Width = 76
Height = 53
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -45
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = ScanClick
end
object CDLEN: TEdit
Left = 69
Top = 53
Width = 90
Height = 53
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -45
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
OnClick = ScanClick
end
end
end
object Panel2: TPanel
Left = 399
Top = 85
Width = 212
Height = 637
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 2
object Label9: TLabel
Left = 177
Top = 135
Width = 15
Height = 22
Caption = 'M'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = Label9Click
end
object Label4: TLabel
Left = 385
Top = 230
Width = 28
Height = 22
Caption = 'KG'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 21
Top = 134
Width = 40
Height = 23
Caption = #38271#24230
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 225
Top = 234
Width = 40
Height = 23
Caption = #27611#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 11
Top = 480
Width = 40
Height = 23
Caption = #27491#21697
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 110
Top = 480
Width = 40
Height = 22
Caption = #27425#21697
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label30: TLabel
Left = 225
Top = 145
Width = 40
Height = 23
Caption = #30382#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label31: TLabel
Left = 385
Top = 189
Width = 28
Height = 22
Caption = 'KG'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label32: TLabel
Left = 225
Top = 189
Width = 40
Height = 23
Caption = #20928#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label33: TLabel
Left = 385
Top = 145
Width = 28
Height = 22
Caption = 'KG'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label36: TLabel
Left = 43
Top = 13
Width = 40
Height = 23
Caption = #21367#21495
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 3
Top = 43
Width = 80
Height = 23
Caption = #32463#32447#25209#21495
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 226
Top = 278
Width = 40
Height = 23
Caption = #31995#25968
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 6
Top = 103
Width = 71
Height = 23
Caption = #25377#36710#24037'1'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 6
Top = 169
Width = 71
Height = 23
Caption = #25377#36710#24037'2'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 179
Top = 203
Width = 15
Height = 22
Caption = 'M'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = Label6Click
end
object Label15: TLabel
Left = 21
Top = 202
Width = 40
Height = 23
Caption = #38271#24230
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 178
Top = 271
Width = 15
Height = 22
Caption = 'M'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = Label16Click
end
object Label19: TLabel
Left = 20
Top = 269
Width = 40
Height = 23
Caption = #38271#24230
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 6
Top = 237
Width = 71
Height = 23
Caption = #25377#36710#24037'3'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label22: TLabel
Left = 6
Top = 301
Width = 71
Height = 23
Caption = #25377#36710#24037'4'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 179
Top = 337
Width = 15
Height = 22
Caption = 'M'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = Label23Click
end
object Label24: TLabel
Left = 19
Top = 335
Width = 40
Height = 23
Caption = #38271#24230
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label25: TLabel
Left = 6
Top = 369
Width = 71
Height = 23
Caption = #25377#36710#24037'5'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 179
Top = 401
Width = 15
Height = 22
Caption = 'M'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
OnClick = Label27Click
end
object Label28: TLabel
Left = 19
Top = 400
Width = 40
Height = 23
Caption = #38271#24230
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object lbl1: TLabel
Left = 174
Top = 434
Width = 23
Height = 19
Caption = 'KG'
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -17
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object lbl2: TLabel
Left = 18
Top = 434
Width = 40
Height = 23
Caption = #27611#37325
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label41: TLabel
Left = 5
Top = 73
Width = 80
Height = 23
Caption = #32428#32447#25209#21495
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label46: TLabel
Left = 11
Top = 524
Width = 40
Height = 23
Caption = #24320#21098
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object JYLen1: TEdit
Left = 65
Top = 132
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnChange = JYLen1Change
OnClick = ScanClick
OnKeyPress = MJstr3KeyPress
OnMouseDown = JYLen1MouseDown
end
object BTPrint: TButton
Left = 20
Top = 574
Width = 80
Height = 45
Caption = #25552#20132
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
OnClick = BTPrintClick
end
object Button5: TButton
Left = 115
Top = 574
Width = 80
Height = 45
Caption = #37325#25171
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -20
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
Visible = False
OnClick = Button5Click
end
object Edit3: TEdit
Left = 52
Top = 470
Width = 40
Height = 43
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 4
Text = #8730
OnClick = Edit3Click
OnKeyPress = MJstr3KeyPress
end
object Edit4: TEdit
Left = 152
Top = 470
Width = 40
Height = 43
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 5
OnClick = Edit4Click
OnKeyPress = MJstr3KeyPress
end
object JYTare: TEdit
Left = 269
Top = 136
Width = 110
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnKeyPress = MJstr3KeyPress
end
object JYNW: TEdit
Left = 269
Top = 180
Width = 110
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
OnKeyPress = JYNWKeyPress
end
object JYxh: TEdit
Left = 83
Top = 4
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = ScanClick
end
object JYXS: TEdit
Left = 269
Top = 269
Width = 110
Height = 41
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 8
OnChange = JYLen1Change
OnKeyPress = MJstr3KeyPress
end
object BatchNo: TEdit
Left = 84
Top = 37
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
OnClick = ScanClick
end
object person1: TEdit
Left = 80
Top = 99
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 10
OnClick = person1Click
end
object person2: TEdit
Left = 80
Top = 165
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 11
OnClick = person2Click
end
object JYLen2: TEdit
Left = 65
Top = 198
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 12
OnChange = JYLen1Change
OnClick = ScanClick
OnKeyPress = MJstr3KeyPress
OnMouseDown = JYLen2MouseDown
end
object JYLen3: TEdit
Left = 65
Top = 264
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 13
OnChange = JYLen1Change
OnClick = ScanClick
OnKeyPress = MJstr3KeyPress
OnMouseDown = JYLen3MouseDown
end
object person3: TEdit
Left = 80
Top = 232
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 14
OnClick = person3Click
end
object person4: TEdit
Left = 79
Top = 297
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 15
OnClick = person4Click
end
object JYLen4: TEdit
Left = 63
Top = 330
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 16
OnChange = JYLen1Change
OnClick = ScanClick
OnKeyPress = MJstr3KeyPress
OnMouseDown = JYLen4MouseDown
end
object person5: TEdit
Left = 80
Top = 364
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 17
OnClick = person5Click
end
object JYLen5: TEdit
Left = 63
Top = 397
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 18
OnChange = JYLen1Change
OnClick = ScanClick
OnKeyPress = MJstr3KeyPress
OnMouseDown = JYLen5MouseDown
end
object JYGW: TEdit
Left = 62
Top = 430
Width = 110
Height = 30
AutoSize = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -25
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 19
OnChange = JYGWChange
OnClick = ScanClick
OnKeyPress = MJstr3KeyPress
end
object WXPH: TEdit
Left = 86
Top = 69
Width = 110
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 20
OnClick = ScanClick
end
object kaijian: TEdit
Left = 52
Top = 520
Width = 137
Height = 32
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -24
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 21
OnClick = ScanClick
OnKeyPress = MJstr3KeyPress
end
end
object Panel3: TPanel
Left = 10
Top = 467
Width = 385
Height = 231
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 4
Visible = False
object SpeedButton1: TSpeedButton
Left = 4
Top = 3
Width = 70
Height = 70
Caption = '0'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 78
Top = 3
Width = 70
Height = 70
Caption = '1'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton3: TSpeedButton
Left = 152
Top = 3
Width = 70
Height = 70
Caption = '2'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton4: TSpeedButton
Left = 226
Top = 3
Width = 70
Height = 70
Caption = '3'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton5: TSpeedButton
Left = 4
Top = 75
Width = 70
Height = 70
Caption = '4'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton6: TSpeedButton
Left = 78
Top = 75
Width = 70
Height = 70
Caption = '5'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton7: TSpeedButton
Left = 152
Top = 75
Width = 70
Height = 70
Caption = '6'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton8: TSpeedButton
Left = 226
Top = 75
Width = 70
Height = 70
Caption = '7'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton9: TSpeedButton
Left = 4
Top = 150
Width = 70
Height = 70
Caption = '8'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton10: TSpeedButton
Left = 78
Top = 150
Width = 70
Height = 70
Caption = '9'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton11: TSpeedButton
Tag = 9
Left = 152
Top = 150
Width = 70
Height = 70
Caption = '.'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton12: TSpeedButton
Left = 226
Top = 150
Width = 70
Height = 70
Caption = #8592
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -37
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
OnClick = SpeedButton12Click
end
object SpeedButton49: TSpeedButton
Tag = 9
Left = 303
Top = 77
Width = 72
Height = 67
Caption = #38544#34255
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -28
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton49Click
end
object SpeedButton84: TSpeedButton
Tag = 9
Left = 303
Top = 4
Width = 70
Height = 70
Caption = '-'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = #40657#20307
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton1Click
end
object SpeedButton43: TSpeedButton
Tag = 9
Left = 304
Top = 149
Width = 72
Height = 73
Caption = #22238#36710
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -28
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold]
ParentFont = False
OnClick = SpeedButton43Click
end
end
object Panel7: TPanel
Left = 611
Top = 85
Width = 242
Height = 637
Align = alLeft
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 3
object cxGrid2: TcxGrid
Left = 2
Top = 2
Width = 238
Height = 295
Align = alClient
TabOrder = 0
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
OnCellDblClick = Tv2CellDblClick
DataController.DataSource = DS_MJCD
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
Column = v2Column1
end
item
Kind = skSum
end
item
Kind = skSum
Column = v2Column3
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsSelection.CellSelect = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object tv2CDType: TcxGridDBColumn
Caption = #30133#28857#21517#31216
DataBinding.FieldName = 'CDName'
HeaderAlignmentHorz = taCenter
Options.Focusing = False
Options.Sorting = False
Width = 75
end
object ZZPerson: TcxGridDBColumn
Caption = #25377#36710#24037
DataBinding.FieldName = 'DCheKouK'
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 71
end
object Tv2CDReason: TcxGridDBColumn
Caption = #21407#22240
DataBinding.FieldName = 'CDReason'
Visible = False
HeaderAlignmentHorz = taCenter
Options.Sorting = False
Width = 60
end
object v2Column1: TcxGridDBColumn
DataBinding.FieldName = 'CDQty'
Visible = False
Width = 60
end
object v2Column3: TcxGridDBColumn
Caption = #25377#36710#24037#25187#27454
DataBinding.FieldName = 'DChePrice'
HeaderAlignmentHorz = taCenter
Width = 68
end
object v2Column2: TcxGridDBColumn
Caption = #26426#20462#24037
DataBinding.FieldName = 'JXiuKouK'
HeaderAlignmentHorz = taCenter
Width = 66
end
object v2Column4: TcxGridDBColumn
Caption = #26426#20462#24037#25187#27454
DataBinding.FieldName = 'JXiuPrice'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv2Column1: TcxGridDBColumn
Caption = #25377#36710#24037#24320#26426#36153
DataBinding.FieldName = 'DCGKaiJ'
HeaderAlignmentHorz = taCenter
Width = 66
end
object Tv2Column2: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'CDLEN'
HeaderAlignmentHorz = taCenter
Width = 62
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv2
end
end
object OrdNote: TRichEdit
Left = 2
Top = 342
Width = 238
Height = 293
Align = alBottom
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ScrollBars = ssVertical
TabOrder = 1
end
object Panel1: TPanel
Left = 2
Top = 297
Width = 238
Height = 45
Align = alBottom
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
object Label26: TLabel
Left = 11
Top = 10
Width = 40
Height = 22
Caption = #20986#32440
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label34: TLabel
Left = 110
Top = 10
Width = 40
Height = 22
Caption = #20221#25968
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Edit6: TEdit
Left = 52
Top = -1
Width = 40
Height = 43
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -35
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = #8730
OnClick = Edit6Click
OnKeyPress = MJstr3KeyPress
end
object ComboBox1: TComboBox
Left = 153
Top = 1
Width = 40
Height = 40
Style = csDropDownList
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -28
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ItemHeight = 32
ItemIndex = 0
ParentFont = False
TabOrder = 1
Text = '1'
Items.Strings = (
'1'
'2'
'3'
'4')
end
end
end
object Panel5: TPanel
Left = 0
Top = 0
Width = 1308
Height = 85
Align = alTop
TabOrder = 0
object Panel6: TPanel
Left = 1
Top = 31
Width = 1306
Height = 53
Align = alClient
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clSkyBlue
TabOrder = 1
object Label1: TLabel
Left = 9
Top = 16
Width = 80
Height = 19
Caption = #25195#25551#20837#21475
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label35: TLabel
Left = 324
Top = 16
Width = 40
Height = 19
Caption = #30721#34920
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label39: TLabel
Left = 488
Top = 16
Width = 40
Height = 19
Caption = #37325#25171
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Label29: TLabel
Left = 583
Top = 16
Width = 80
Height = 19
Caption = #25195#25551#21024#38500
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object lblJYPS: TLabel
Left = 681
Top = 3
Width = 80
Height = 23
Caption = #26816#39564#21305#25968
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object lblJYLen: TLabel
Left = 681
Top = 27
Width = 80
Height = 23
Caption = #26816#39564#31859#25968
Font.Charset = ANSI_CHARSET
Font.Color = clRed
Font.Height = -20
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
end
object Label40: TLabel
Left = 408
Top = 16
Width = 20
Height = 19
Caption = #31204
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
end
object Scan: TEdit
Left = 88
Top = 12
Width = 185
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = ScanClick
OnKeyPress = ScanKeyPress
end
object Edit7: TEdit
Left = 295
Top = 12
Width = 28
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = #8730
OnClick = Edit7Click
end
object Edit8: TEdit
Left = 459
Top = 12
Width = 28
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 0
OnClick = Edit8Click
end
object edtDel: TEdit
Left = 554
Top = 12
Width = 28
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 3
OnClick = edtDelClick
end
object Edit1: TEdit
Left = 379
Top = 12
Width = 28
Height = 27
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 4
Text = #8730
OnClick = Edit1Click
end
end
object ToolBar1: TToolBar
Left = 1
Top = 1
Width = 1306
Height = 30
ButtonHeight = 30
ButtonWidth = 95
Caption = 'ToolBar1'
Color = clSkyBlue
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Images = DataLink_FabricInspection.ThreeImgList
List = True
ParentColor = False
ParentFont = False
ShowCaptions = True
TabOrder = 0
object ToolButton1: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 0
OnClick = ToolButton1Click
end
object TBCD: TToolButton
Left = 63
Top = 0
AutoSize = True
Caption = #30133#28857#31649#29702
ImageIndex = 97
OnClick = TBCDClick
end
object ToolButton3: TToolButton
Left = 150
Top = 0
AutoSize = True
Caption = #25377#36710#24037#31649#29702
ImageIndex = 22
OnClick = ToolButton3Click
end
object ToolButton5: TToolButton
Left = 249
Top = 0
AutoSize = True
Caption = #26426#20462#24037#31649#29702
ImageIndex = 22
OnClick = ToolButton5Click
end
object ToolButton2: TToolButton
Left = 348
Top = 0
AutoSize = True
Caption = #25209#21495#31649#29702
ImageIndex = 97
Visible = False
OnClick = ToolButton2Click
end
object ToolButton4: TToolButton
Left = 435
Top = 0
Caption = #25377#36710#24037#20135#37327
ImageIndex = 22
OnClick = ToolButton4Click
end
object TBClose: TToolButton
Left = 530
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 21
OnClick = TBCloseClick
end
end
end
object cxGrid3: TcxGrid
Left = 853
Top = 85
Width = 455
Height = 637
Align = alClient
TabOrder = 5
object Tv3: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
DataController.DataSource = DS_MJID
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
Column = v3Column2
end
item
Kind = skSum
end
item
Kind = skSum
end
item
Format = #21367#25968':0'
Kind = skCount
Column = cxGridDBColumn1
end>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsView.Footer = True
OptionsView.GroupByBox = False
object cxGridDBColumn1: TcxGridDBColumn
Caption = #21367#26465#30721
DataBinding.FieldName = 'JYID'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 113
end
object v3Column1: TcxGridDBColumn
Caption = #21367#21495
DataBinding.FieldName = 'JYXH'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 40
end
object v3Column2: TcxGridDBColumn
Caption = #38271#24230
DataBinding.FieldName = 'JYLen'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Options.Sorting = False
Width = 42
end
object v3Column3: TcxGridDBColumn
Caption = #31867#22411
DataBinding.FieldName = 'JYType'
Options.Editing = False
Options.Sorting = False
Width = 40
end
object Tv3Column1: TcxGridDBColumn
Caption = #27611#37325
DataBinding.FieldName = 'JYGW'
HeaderAlignmentHorz = taCenter
Width = 50
end
object Tv3Column2: TcxGridDBColumn
Caption = #23454#38469#20811#37325
DataBinding.FieldName = 'SJKZ'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 72
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv3
end
end
object cxGridPopupMenu1: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 796
Top = 376
end
object DataSource1: TDataSource
DataSet = Order_MJ
Left = 772
Top = 456
end
object Order_MJ: TClientDataSet
Aggregates = <>
Params = <>
Left = 736
Top = 460
end
object ADOCmd: TADOQuery
Connection = DataLink_FabricInspection.ADOLink
Parameters = <>
Left = 700
Top = 184
end
object RMDB_Main: TRMDBDataSet
Visible = True
DataSet = ADOQueryPrint
Left = 768
Top = 560
end
object RM2: 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 = 736
Top = 564
ReportData = {}
end
object DS_MJCD: TDataSource
DataSet = CDS_MJCD
Left = 764
Top = 376
end
object CDS_MJCD: TClientDataSet
Aggregates = <>
Params = <>
Left = 728
Top = 376
end
object DS_MJID: TDataSource
DataSet = CDS_MJID
Left = 764
Top = 416
end
object CDS_MJID: TClientDataSet
Aggregates = <>
Params = <>
Left = 732
Top = 416
end
object ADOQueryPrint: TADOQuery
Connection = DataLink_FabricInspection.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 660
Top = 184
end
object cxGridPopupMenu2: TcxGridPopupMenu
Grid = cxGrid3
PopupMenus = <>
Left = 800
Top = 415
end
object ADOQueryMainDSC: TADOQuery
Connection = DataLink_FabricInspection.ADOLink
LockType = ltReadOnly
Parameters = <>
SQL.Strings = (
'select A.*,C.OrderNo,B.SWFBColor,B.SWFBHW,B.SWFBCodeName,'
' B.SWFBCode,B.SWFBKZ,B.WKMS,B.KZBig,B.KZSmal,'
' SCMQty=(select isnull(Sum(MJLen),0) from WFB_MJJY WM wher' +
'e WM.APId=A.APId and len(WM.MJID)>8),'
' Case when A.OrderQtyM-(select isnull(Sum(MJLen),0) from W' +
'FB_MJJY WM where WM.APId=A.APId )>0 '
' then A.OrderQtyM-(select isnull(Sum(MJLen),0) fr' +
'om WFB_MJJY WM where WM.APId=A.APId ) else 0 end as WSCMQty'
'from WFBOrder_Sub_AnPai A '
'inner join WFBOrder_Sub B on A.SubId=B.SubId'
'inner join WFBOrder_Main C on A.MainId=C.MainId'
'where C.ChkStatus='#39#23457#26680#36890#36807#39' and RTrim(isnull(A.SCStatus,'#39#39'))<>'#39#24050#23436#25104#39 +
' '
'and isnull(B.AnPaiChkStatus,'#39#39')='#39#23457#26680#36890#36807#39' and A.SCXDFlag=1'
'')
Left = 700
Top = 460
end
object RM3: 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 = 696
Top = 564
ReportData = {}
end
object ADOTmp: TADOQuery
Connection = DataLink_FabricInspection.ADOLink
Parameters = <>
Left = 739
Top = 183
end
object QryCheckNet: TADOQuery
Connection = DataLink_FabricInspection.ADOLink
LockType = ltReadOnly
Parameters = <>
SQL.Strings = (
'select A.*,C.OrderNo,B.SWFBColor,B.SWFBHW,B.SWFBCodeName,'
' B.SWFBCode,B.SWFBKZ,B.WKMS,B.KZBig,B.KZSmal,'
' SCMQty=(select isnull(Sum(MJLen),0) from WFB_MJJY WM wher' +
'e WM.APId=A.APId and len(WM.MJID)>8),'
' Case when A.OrderQtyM-(select isnull(Sum(MJLen),0) from W' +
'FB_MJJY WM where WM.APId=A.APId )>0 '
' then A.OrderQtyM-(select isnull(Sum(MJLen),0) fr' +
'om WFB_MJJY WM where WM.APId=A.APId ) else 0 end as WSCMQty'
'from WFBOrder_Sub_AnPai A '
'inner join WFBOrder_Sub B on A.SubId=B.SubId'
'inner join WFBOrder_Main C on A.MainId=C.MainId'
'where C.ChkStatus='#39#23457#26680#36890#36807#39' and RTrim(isnull(A.SCStatus,'#39#39'))<>'#39#24050#23436#25104#39 +
' '
'and isnull(B.AnPaiChkStatus,'#39#39')='#39#23457#26680#36890#36807#39' and A.SCXDFlag=1'
'')
Left = 696
Top = 516
end
end