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