object frmQCRKInPut_KC: TfrmQCRKInPut_KC Left = 190 Top = 136 Width = 1241 Height = 688 Caption = #26399#21021#24211#23384#26126#32454 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -17 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 107 TextHeight = 17 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1225 Height = 30 ButtonHeight = 30 ButtonWidth = 79 Caption = 'ToolBar1' Color = clBtnFace EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -21 Font.Name = #23435#20307 Font.Style = [fsBold] Images = DataLink_MYSC.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object Label26: TLabel Left = 0 Top = 0 Width = 36 Height = 30 Caption = ' ' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object TBSave: TToolButton Left = 36 Top = 0 Caption = #20445#23384 ImageIndex = 5 end object Label19: TLabel Left = 115 Top = 0 Width = 384 Height = 30 Caption = ' ' end object labMYType: TLabel Left = 499 Top = 0 Width = 120 Height = 30 Caption = #26399#21021#24211#23384 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -29 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label21: TLabel Left = 619 Top = 0 Width = 432 Height = 30 Caption = ' ' end object TBClose: TToolButton Left = 1051 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel3: TPanel Left = 0 Top = 30 Width = 418 Height = 618 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 1 object Label34: TLabel Left = 28 Top = 31 Width = 51 Height = 16 Caption = #32534#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label13: TLabel Left = 651 Top = 34 Width = 85 Height = 16 Caption = #20837#24211#26085#26399#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label1: TLabel Left = 28 Top = 72 Width = 51 Height = 16 Caption = #21697#21517#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label11: TLabel Left = 28 Top = 234 Width = 51 Height = 16 Caption = #39068#33394#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 28 Top = 152 Width = 51 Height = 16 Caption = #20811#37325#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 28 Top = 112 Width = 51 Height = 16 Caption = #38376#24133#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label15: TLabel Left = 149 Top = 111 Width = 23 Height = 19 Caption = 'CM' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Cambria' Font.Style = [fsBold] ParentFont = False end object Label16: TLabel Left = 149 Top = 151 Width = 33 Height = 19 Caption = 'g/'#13217 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = 'Cambria' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 28 Top = 193 Width = 51 Height = 16 Caption = #33394#21495#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label3: TLabel Left = 140 Top = 187 Width = 15 Height = 28 Caption = '#' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -24 Font.Name = 'Cambria' Font.Style = [fsBold] ParentFont = False end object Label27: TLabel Left = 39 Top = -16 Width = 51 Height = 16 Caption = #25195#25551#65306 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label6: TLabel Left = 28 Top = 316 Width = 51 Height = 16 Caption = #24211#20301#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label31: TLabel Left = 28 Top = 276 Width = 51 Height = 16 Caption = #24037#33402#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label33: TLabel Left = 28 Top = 355 Width = 51 Height = 16 Caption = #22791#27880#65306 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object MYCode: TEdit Tag = 2 Left = 77 Top = 27 Width = 308 Height = 23 Color = clSilver Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 0 end object CRTime: TDateTimePicker Tag = 2 Left = 741 Top = 31 Width = 143 Height = 23 Date = 42459.000000000000000000 Time = 42459.000000000000000000 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 end object MYName: TEdit Tag = 2 Left = 77 Top = 68 Width = 264 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnKeyPress = MYNameKeyPress end object MYColor: TEdit Tag = 2 Left = 77 Top = 230 Width = 95 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 end object MYKZ: TEdit Tag = 2 Left = 77 Top = 149 Width = 68 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 4 end object MYMF: TEdit Tag = 2 Left = 77 Top = 108 Width = 68 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 Text = '150' end object MYColorNo: TEdit Tag = 2 Left = 77 Top = 190 Width = 60 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 end object MYType: TBtnEditA Tag = 2 Left = 698 Top = 203 Width = 113 Height = 25 Hint = 'MYTypeFlag' Color = clMenuBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 7 end object MLID: TEdit Tag = 2 Left = 696 Top = 102 Width = 139 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 8 end object BPID: TEdit Tag = 2 Left = 696 Top = 138 Width = 139 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 9 end object DYID: TEdit Tag = 2 Left = 696 Top = 66 Width = 139 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 10 end object PTID: TEdit Tag = 2 Left = 696 Top = 175 Width = 139 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 11 end object Edit1: TEdit Tag = 99 Left = 88 Top = -19 Width = 267 Height = 23 Color = clGradientInactiveCaption Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 12 Visible = False end object Panel6: TPanel Left = 195 Top = 108 Width = 188 Height = 146 BevelInner = bvRaised BevelOuter = bvLowered PopupMenu = PopupMenu1 TabOrder = 13 OnDblClick = Panel6DblClick end object Note: TEdit Tag = 2 Left = 77 Top = 313 Width = 308 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 14 end object GYLXName: TEdit Tag = 2 Left = 77 Top = 272 Width = 266 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 15 end object Button4: TButton Left = 342 Top = 267 Width = 42 Height = 31 Caption = '...' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 16 OnClick = Button4Click end object Button5: TButton Left = 341 Top = 64 Width = 42 Height = 31 Caption = '...' Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 17 OnClick = Button5Click end object Note2: TEdit Tag = 2 Left = 77 Top = 352 Width = 308 Height = 23 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 18 end end object Panel1: TPanel Left = 418 Top = 30 Width = 807 Height = 618 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object Panel2: TPanel Left = 2 Top = 2 Width = 803 Height = 47 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 0 object Label4: TLabel Left = 31 Top = 16 Width = 38 Height = 18 Caption = #32568#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label8: TLabel Left = 142 Top = 16 Width = 38 Height = 18 Caption = #21305#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label17: TLabel Left = 249 Top = 16 Width = 57 Height = 18 Caption = #20844#26020#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label18: TLabel Left = 505 Top = 16 Width = 38 Height = 18 Caption = #31859#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label25: TLabel Left = 388 Top = 16 Width = 38 Height = 18 Caption = #22343#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 621 Top = 16 Width = 38 Height = 18 Caption = #22343#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -18 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object GangQty: TEdit Tag = 2 Left = 71 Top = 14 Width = 41 Height = 23 Color = clMenuBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 0 end object MXHZPS: TEdit Tag = 2 Left = 181 Top = 14 Width = 41 Height = 23 Color = clMenuBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 1 end object MXHZKGQty: TEdit Tag = 2 Left = 308 Top = 14 Width = 73 Height = 23 Color = clMenuBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 2 Visible = False end object MXHZQty: TEdit Tag = 2 Left = 546 Top = 14 Width = 73 Height = 23 Color = clMenuBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 3 end object KgQtyAvg: TEdit Tag = 99 Left = 428 Top = 14 Width = 56 Height = 23 Color = clMenuBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 4 end object QtyAvg: TEdit Tag = 99 Left = 660 Top = 14 Width = 55 Height = 23 Color = clMenuBar Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False ReadOnly = True TabOrder = 5 end object Button3: TButton Left = 726 Top = 11 Width = 46 Height = 28 Caption = #25171#21360 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 6 OnClick = Button3Click end end object cxGrid1: TcxGrid Left = 2 Top = 49 Width = 803 Height = 567 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 object Tv1: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False DataController.DataSource = DataSource1 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Format = '0.0' Kind = skSum Column = v1Column17 end item Format = '0.0' Kind = skSum Column = v1MQty end item Kind = skCount Column = v1Column1 end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Content = DataLink_MYSC.Default10 Styles.Inactive = DataLink_MYSC.FontBlue11 Styles.IncSearch = DataLink_MYSC.FontBlue11 Styles.Selection = DataLink_MYSC.FontBlue11 Styles.Header = DataLink_MYSC.Default10 object v1Column4: TcxGridDBColumn Caption = #36873#20013 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 46 end object v1Column6: TcxGridDBColumn Caption = #32568#21495 DataBinding.FieldName = 'RCGangNo1' HeaderAlignmentHorz = taCenter Options.Focusing = False Width = 127 end object v1Column1: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'JH' HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Footer = DataLink_MYSC.Default10 Width = 74 end object v1Column17: TcxGridDBColumn Caption = #20844#26020#25968 DataBinding.FieldName = 'KgQty' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Styles.Footer = DataLink_MYSC.Default10 Width = 113 end object v1MQty: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'MQty' HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Footer = DataLink_MYSC.Default10 Width = 100 end object v1Laster: TcxGridDBColumn Caption = #25805#20316#26597#30475 DataBinding.FieldName = 'Laster' PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = True Properties.OnButtonClick = v1Column7PropertiesButtonClick HeaderAlignmentHorz = taCenter Width = 79 end object v1MXNote: TcxGridDBColumn Caption = #26126#32454#22791#27880 DataBinding.FieldName = 'MXNote' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 237 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object Panel5: TPanel Left = 427 Top = 74 Width = 327 Height = 267 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 2 Visible = False object Label28: TLabel Left = 74 Top = 52 Width = 56 Height = 27 Caption = #24352#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -27 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label29: TLabel Left = 74 Top = 125 Width = 56 Height = 27 Caption = #23610#23544 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -27 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label30: TLabel Left = 125 Top = 12 Width = 68 Height = 16 Caption = #26631#31614#25171#21360 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object ComboBox2: TComboBox Left = 133 Top = 48 Width = 105 Height = 35 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -27 Font.Name = #23435#20307 Font.Style = [fsBold] ItemHeight = 27 ItemIndex = 0 ParentFont = False TabOrder = 0 Text = '1' Items.Strings = ( '1' '2' '3') end object ComboBox1: TComboBox Left = 133 Top = 120 Width = 105 Height = 35 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -27 Font.Name = #23435#20307 Font.Style = [fsBold] ItemHeight = 27 ParentFont = False TabOrder = 1 Items.Strings = ( '8*5' '9*7') end object BtnPrt: TButton Left = 214 Top = 190 Width = 91 Height = 57 Caption = #30830#23450 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = BtnPrtClick end object BtnQX: TButton Left = 25 Top = 190 Width = 91 Height = 57 Caption = #21462#28040 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -37 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnClick = BtnQXClick end end end object ADOTemp: TADOQuery Connection = DataLink_MYSC.ADOLink LockType = ltReadOnly Parameters = <> Left = 744 Top = 317 end object ADOCmd: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 680 Top = 317 end object ADOQuery1: TADOQuery Connection = DataLink_MYSC.ADOLink Parameters = <> Left = 712 Top = 317 end object DataSource1: TDataSource DataSet = ClientDataSet1 Left = 650 Top = 318 end object ClientDataSet1: TClientDataSet Aggregates = <> Params = <> Left = 619 Top = 319 end object cxGridPopupMenu1: TcxGridPopupMenu PopupMenus = <> Left = 588 Top = 320 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] DefaultCollate = False ShowPrintDialog = False SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' PreviewOptions.RulerUnit = rmutScreenPixels PreviewOptions.RulerVisible = False PreviewOptions.DrawBorder = False PreviewOptions.BorderPen.Color = clGray PreviewOptions.BorderPen.Style = psDash Dataset = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 773 Top = 317 ReportData = {} end object CDS_Print: TClientDataSet Aggregates = <> Params = <> Left = 803 Top = 317 end object RMDB_Main: TRMDBDataSet Visible = True DataSet = CDS_Print Left = 833 Top = 317 end object PopupMenu1: TPopupMenu Left = 377 Top = 65512 object N1: TMenuItem Caption = #36873#25321#39068#33394 OnClick = N1Click end end end