object Form2: TForm2 Left = 0 Top = 0 Caption = 'Form2' ClientHeight = 533 ClientWidth = 931 Color = clBtnFace DoubleBuffered = True Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FormStyle = fsMDIChild OldCreateOrder = False Visible = True OnClose = FormClose OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 12 object cxProgressBar2: TcxProgressBar Left = 482 Top = 65 Margins.Left = 1 Margins.Top = 1 Margins.Right = 1 Margins.Bottom = 1 ParentFont = False Properties.AnimationSpeed = 2 Properties.BarStyle = cxbsGradientLEDs Properties.BeginColor = 65408 Properties.Marquee = True Properties.Text = 'loading...' Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clSilver Style.Font.Height = -14 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [] Style.LookAndFeel.SkinName = 'VS2010' Style.Shadow = False Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = 'VS2010' StyleFocused.LookAndFeel.SkinName = 'VS2010' StyleHot.LookAndFeel.SkinName = 'VS2010' TabOrder = 0 Transparent = True Visible = False Width = 153 end object Panel_right: TPanel Left = 679 Top = 0 Width = 252 Height = 533 Align = alRight Caption = 'Panel_right' TabOrder = 1 object cxGrid3: TcxGrid Tag = 9999 Left = 1 Top = 91 Width = 250 Height = 168 Align = alClient TabOrder = 0 object Tv3: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = ds_3 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum end item Kind = skSum end item Kind = skSum Column = v3GrossWeight end item Kind = skSum Column = v3NetWeight end item Format = #21367#25968':0' Kind = skCount Column = tv3CIID end item Kind = skSum end item Kind = skSum Column = Tv3Yardage end item Kind = skSum Column = Tv3Meter end item Kind = skSum end item Kind = skCount Column = v3PieceNo end item Kind = skSum Column = Tv3SubtractQty end item Kind = skSum Column = Tv3AddLenPresent end item Kind = skSum Column = Tv3AddwetPresent end item Kind = skSum Column = Tv3addlen end item Kind = skSum Column = Tv3addWet end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsView.Footer = True OptionsView.GroupByBox = False object v3PieceNo: TcxGridDBColumn Caption = #21367#21495 DataBinding.FieldName = 'PieceNo' DataBinding.IsNullValueType = True FixedKind = fkLeftDynamic HeaderAlignmentHorz = taCenter Options.Editing = False Width = 71 end object Tv3Yardage: TcxGridDBColumn Caption = #30721#25968 DataBinding.FieldName = 'Yardage' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 69 end object Tv3Meter: TcxGridDBColumn Caption = #31859#25968 DataBinding.FieldName = 'Meter' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 79 end object v3NetWeight: TcxGridDBColumn Caption = #20928#37325 DataBinding.FieldName = 'NetWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 62 end object v3GrossWeight: TcxGridDBColumn Caption = #27611#37325 DataBinding.FieldName = 'GrossWeight' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 61 end object Tv3Grade: TcxGridDBColumn Caption = #31561#32423 DataBinding.FieldName = 'Grade' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 54 end object Tv3PacketNo: TcxGridDBColumn Caption = #21253#21495 DataBinding.FieldName = 'PacketNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 57 end object Tv3BatchNO: TcxGridDBColumn Caption = #26412#21378#32568#21495 DataBinding.FieldName = 'BatchNO' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 89 end object tv3CIID: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'CIID' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 112 end object Tv3FtyPCId: TcxGridDBColumn Caption = #32568#21495 DataBinding.FieldName = 'FtyPCId' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 77 end object Tv3SubtractQty: TcxGridDBColumn Caption = #20943#21435#25968#37327 DataBinding.FieldName = 'SubtractQty' DataBinding.IsNullValueType = True Options.Editing = False Width = 60 end object Tv3AddwetPresent: TcxGridDBColumn Caption = #36192#37325 DataBinding.FieldName = 'AddwetPresent' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 56 end object Tv3AddLenPresent: TcxGridDBColumn Caption = #36192#38271 DataBinding.FieldName = 'AddLenPresent' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 57 end object Tv3addlen: TcxGridDBColumn Caption = #21152#38271 DataBinding.FieldName = 'addlen' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Filtering = False Width = 52 end object Tv3addWet: TcxGridDBColumn Caption = #21152#37325 DataBinding.FieldName = 'addWet' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Filtering = False Width = 55 end object Tv3unitPieces: TcxGridDBColumn Caption = #25340#21305 DataBinding.FieldName = 'unitPieces' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 59 end end object cxGridLevel2: TcxGridLevel GridView = Tv3 end end object cxPageControl1: TcxPageControl Tag = 999 Left = 1 Top = 259 Width = 250 Height = 273 Align = alBottom TabOrder = 1 Properties.ActivePage = 查看 Properties.CustomButtons.Buttons = <> ClientRectBottom = 271 ClientRectLeft = 2 ClientRectRight = 248 ClientRectTop = 28 object cxTabSheet1: TcxTabSheet Caption = #24405#20837 ImageIndex = 0 object cxGrid2: TcxGrid Tag = 999 Left = 0 Top = 0 Width = 246 Height = 243 Align = alClient TabOrder = 0 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_2 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = Tv2CDQty end item Kind = skSum Column = v2Column3 end item Kind = skSum Column = v2Column4 end item Kind = skSum Column = Tv2SubtractQty end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsCustomize.ColumnSorting = False OptionsSelection.CellSelect = False OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.IndicatorWidth = 20 object tv2CDType: TcxGridDBColumn Caption = #30133#28857#21517#31216 DataBinding.FieldName = 'CIFName' DataBinding.IsNullValueType = True FixedKind = fkLeftDynamic HeaderAlignmentHorz = taCenter Options.Focusing = False Options.Sorting = False Width = 122 end object tv2CDWZ: TcxGridDBColumn Caption = #20301#32622#36215 DataBinding.FieldName = 'CIFbeg' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Options.Sorting = False Width = 107 end object v2Column2: TcxGridDBColumn Caption = #20301#32622#27490 DataBinding.FieldName = 'CIFend' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 81 end object Tv2CDQty: TcxGridDBColumn Caption = #38271#24230 DataBinding.FieldName = 'CIFQty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 77 end object Tv2CDReason: TcxGridDBColumn Caption = #21407#22240 DataBinding.FieldName = 'CDReason' DataBinding.IsNullValueType = True Visible = False HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 60 end object v2Column1: TcxGridDBColumn DataBinding.FieldName = 'CDQty' DataBinding.IsNullValueType = True Visible = False Width = 60 end object v2Column3: TcxGridDBColumn Caption = #25187#20998 DataBinding.FieldName = 'CIFPoints' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 63 end object v2Column4: TcxGridDBColumn Caption = #20010#25968 DataBinding.FieldName = 'CIFNumber' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 77 end object Tv2SubtractQty: TcxGridDBColumn Caption = #20943#21435#25968#37327 DataBinding.FieldName = 'SubtractQty' DataBinding.IsNullValueType = True end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end end object 查看: TcxTabSheet Caption = #26597#30475 ImageIndex = 1 object cxGrid1: TcxGrid Tag = 999 Left = 0 Top = 0 Width = 246 Height = 243 Align = alClient TabOrder = 0 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = ds_1 DataController.Filter.AutoDataSetFilter = True DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = cxGridDBColumn5 end item Kind = skSum Column = cxGridDBColumn8 end item Kind = skSum Column = cxGridDBColumn9 end item Kind = skSum Column = TV1SubtractQty end> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsCustomize.ColumnSorting = False OptionsSelection.CellSelect = False OptionsView.Footer = True OptionsView.GroupByBox = False object cxGridDBColumn2: TcxGridDBColumn Caption = #30133#28857#21517#31216 DataBinding.FieldName = 'CIFName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Focusing = False Options.Sorting = False Width = 95 end object cxGridDBColumn3: TcxGridDBColumn Caption = #20301#32622#36215 DataBinding.FieldName = 'CIFbeg' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Options.Sorting = False Width = 104 end object cxGridDBColumn4: TcxGridDBColumn Caption = #20301#32622#27490 DataBinding.FieldName = 'CIFend' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter HeaderGlyphAlignmentHorz = taCenter Width = 76 end object cxGridDBColumn5: TcxGridDBColumn Caption = #38271#24230 DataBinding.FieldName = 'CIFQty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 72 end object cxGridDBColumn6: TcxGridDBColumn Caption = #21407#22240 DataBinding.FieldName = 'CDReason' DataBinding.IsNullValueType = True Visible = False HeaderAlignmentHorz = taCenter Options.Sorting = False Width = 60 end object cxGridDBColumn7: TcxGridDBColumn DataBinding.FieldName = 'CDQty' DataBinding.IsNullValueType = True Visible = False Width = 60 end object cxGridDBColumn8: TcxGridDBColumn Caption = #25187#20998 DataBinding.FieldName = 'CIFPoints' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 77 end object cxGridDBColumn9: TcxGridDBColumn Caption = #20010#25968 DataBinding.FieldName = 'CIFNumber' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 67 end object TV1SubtractQty: TcxGridDBColumn Caption = #20943#21435#25968#37327 DataBinding.FieldName = 'SubtractQty' DataBinding.IsNullValueType = True Options.Editing = False end end object cxGridLevel3: TcxGridLevel GridView = TV1 end end end end object ToolBar2: TToolBar Tag = 1000 Left = 1 Top = 1 Width = 250 Height = 90 AutoSize = True ButtonHeight = 30 ButtonWidth = 95 Caption = 'ToolBar1' Color = clSkyBlue EdgeInner = esNone EdgeOuter = esNone Images = DataLink_TradeInsp.cxImageList_bar List = True ParentColor = False ShowCaptions = True TabOrder = 2 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #37325#25171 ImageIndex = 21 end object TprintPack: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #21253#26631#31614 ImageIndex = 21 end object Trolldel: TToolButton Left = 138 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 5 Wrap = True end object ToolButton4: TToolButton Left = 0 Top = 30 AutoSize = True Caption = #30133#28857#31649#29702 ImageIndex = 2 end object Tedit: TToolButton Left = 87 Top = 30 AutoSize = True Caption = #20462#25913 ImageIndex = 3 end object ToolButton7: TToolButton Left = 150 Top = 30 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 Wrap = True end object Tlog: TToolButton Left = 0 Top = 60 AutoSize = True Caption = #26085#24535 ImageIndex = 30 end object TgridLiSet: TToolButton Left = 63 Top = 60 AutoSize = True Caption = #34920#26684#21015#35774#32622 ImageIndex = 16 end object ToolButton8: TToolButton Left = 162 Top = 60 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = ToolButton8Click end end end object dxPanel_mid: TdxPanel Left = 0 Top = 0 Width = 340 Height = 533 Align = alLeft TabOrder = 2 Visible = False ExplicitLeft = 400 inline frameBads1: TframeBads Left = 0 Top = 0 Width = 338 Height = 531 Align = alClient DoubleBuffered = False Color = 16448250 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentBackground = False ParentColor = False ParentDoubleBuffered = False ParentFont = False TabOrder = 0 ExplicitWidth = 338 ExplicitHeight = 531 inherited dxPanel1: TdxPanel Top = 245 Width = 338 Height = 286 ExplicitTop = 245 ExplicitWidth = 338 ExplicitHeight = 286 inherited RadioGroup1: TRadioGroup Top = 103 Width = 336 ExplicitTop = 103 ExplicitWidth = 336 end inherited dxPanel3: TdxPanel Top = 235 Width = 336 ExplicitTop = 235 ExplicitWidth = 336 end inherited dxLayoutControl1: TdxLayoutControl Top = 4 Width = 336 ExplicitTop = 4 ExplicitWidth = 336 inherited IsSubtract: TcxCheckBox ExplicitWidth = 43 Width = 43 end inherited SubtractQty: TcxTextEdit Properties.OnEditValueChanged = nil end inherited dxLayoutControl1Group_Root: TdxLayoutGroup ItemIndex = 1 end end end inherited cxScrollBox1: TcxScrollBox Width = 338 Height = 245 ExplicitWidth = 338 ExplicitHeight = 245 end inherited ADOTmp: TADOQuery Left = 104 Top = 153 end end end object cxGroupBox_keys: TcxGroupBox Left = 316 Top = 54 Caption = #34394#25311#38190#30424 ParentFont = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -15 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.LookAndFeel.NativeStyle = False Style.IsFontAssigned = True StyleDisabled.LookAndFeel.NativeStyle = False TabOrder = 3 Transparent = True Visible = False Height = 245 Width = 319 inline FrameKeyBoard1: TFrameKeyBoard Left = 4 Top = 21 Width = 311 Height = 208 Align = alClient Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False TabOrder = 0 ExplicitLeft = 4 ExplicitTop = 21 ExplicitWidth = 311 ExplicitHeight = 208 inherited dxPanel1: TdxPanel Width = 311 Height = 208 ExplicitWidth = 311 ExplicitHeight = 208 end end object MovePanel1: TMovePanel Left = 80 Top = -25 Width = 237 Height = 42 BevelOuter = bvNone DockSite = True TabOrder = 1 end end object edtScan: TcxTextEdit Tag = 999 Left = 0 Top = 22 ParentFont = False Properties.CharCase = ecUpperCase Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -16 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.SkinName = 'WXI' Style.TransparentBorder = False Style.IsFontAssigned = True StyleDisabled.LookAndFeel.Kind = lfUltraFlat StyleDisabled.LookAndFeel.SkinName = 'WXI' StyleFocused.LookAndFeel.Kind = lfUltraFlat StyleFocused.LookAndFeel.SkinName = 'WXI' StyleHot.LookAndFeel.Kind = lfUltraFlat StyleHot.LookAndFeel.SkinName = 'WXI' TabOrder = 4 Width = 149 end object Button_set: TButton Left = 0 Top = 44 Width = 51 Height = 34 Caption = #35774#32622 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 5 end object Button_bad: TButton Left = 0 Top = 66 Width = 48 Height = 31 Caption = #30133#28857 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 6 end object btnRK: TButton Left = 0 Top = 88 Width = 48 Height = 33 Caption = #20837#24211 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 7 end object btnUnRk: TButton Left = 0 Top = 110 Width = 81 Height = 33 Caption = #25764#20837#24211 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 8 end object Btn_rlBill: TButton Left = 0 Top = 132 Width = 64 Height = 33 Caption = #20837#24211#21333 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 9 end object OrderNo: TcxTextEdit Left = 0 Top = 154 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 10 Width = 121 end object ColorNo: TcxTextEdit Left = 0 Top = 176 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 11 Width = 121 end object FtyPCId: TcxTextEdit Left = 0 Top = 198 Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 12 Width = 121 end object Qty: TcxTextEdit Left = 0 Top = 220 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 13 Width = 121 end object CodeName: TcxTextEdit Left = 0 Top = 242 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 14 Width = 164 end object Color: TcxTextEdit Left = 0 Top = 264 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 15 Width = 164 end object BCIOID: TcxTextEdit Left = 0 Top = 286 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 16 Width = 164 end object Piece: TcxTextEdit Left = 0 Top = 308 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 17 Width = 164 end object BatchNO: TcxTextEdit Left = 0 Top = 330 AutoSize = False Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 18 Height = 31 Width = 57 end object PieceNo: TcxTextEdit Left = 0 Top = 352 AutoSize = False Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 19 Height = 31 Width = 36 end object Edit_pieceOrder: TcxTextEdit Tag = 999 Left = 0 Top = 374 AutoSize = False ParentFont = False Properties.ReadOnly = True Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -16 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 20 Height = 31 Width = 20 end object Edit_fixLen: TcxTextEdit Tag = 999 Left = 0 Top = 396 AutoSize = False ParentFont = False Properties.ReadOnly = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -16 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 21 Height = 31 Width = 20 end object edtPacketNo: TcxTextEdit Left = 0 Top = 418 AutoSize = False ParentFont = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -16 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 22 Height = 31 Width = 35 end object InputLen: TcxTextEdit Tag = 999 Left = 0 Top = 440 AutoSize = False ParentFont = False Properties.ReadOnly = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -21 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 23 Height = 38 Width = 133 end object grade: TcxComboBox Left = 0 Top = 462 AutoSize = False ParentFont = False Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( #27491#21697 #27425#21697) Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -16 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 24 Text = #27491#21697 Height = 38 Width = 95 end object InputWeight: TcxTextEdit Tag = 999 Left = 0 Top = 484 AutoSize = False ParentFont = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -21 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 25 Height = 59 Width = 71 end object Tare: TcxTextEdit Tag = 999 Left = 0 Top = 506 AutoSize = False ParentFont = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -21 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 26 Height = 59 Width = 57 end object BTPrint: TButton Left = 0 Top = 528 Width = 140 Height = 59 Caption = #25552' '#20132 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -29 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 27 end object Coefficient: TcxTextEdit Tag = 999 Left = 0 Top = 550 AutoSize = False ParentFont = False Properties.ReadOnly = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -19 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 28 Height = 37 Width = 53 end object lblRuleConversion: TcxComboBox Tag = 2 Left = 0 Top = 572 AutoSize = False ParentFont = False Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( #26080#38656#36716#25442 #38271#24230#36716#20844#26020 #20928#37325#36716#38271#24230 #27611#37325#36716#38271#24230) Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -13 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.LookAndFeel.SkinName = 'WXI' Style.TransparentBorder = False Style.IsFontAssigned = True StyleDisabled.LookAndFeel.SkinName = 'WXI' StyleFocused.LookAndFeel.SkinName = 'WXI' StyleHot.LookAndFeel.SkinName = 'WXI' TabOrder = 29 Text = #26080#38656#36716#25442 Height = 37 Width = 102 end object packPostBtn: TButton Left = 0 Top = 594 Width = 148 Height = 37 Caption = #25171#21253#25552#20132 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -19 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 30 end object AOrdDefNote1: TcxRichEdit Left = 0 Top = 616 ParentFont = False Properties.ReadOnly = True Properties.ScrollBars = ssBoth Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clBlue Style.Font.Height = -13 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 31 Height = 238 Width = 181 end object packnote: TcxMemo Tag = 999 Left = 0 Top = 638 ParentFont = False Properties.ReadOnly = True Properties.ScrollBars = ssVertical Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clBlue Style.Font.Height = -13 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 32 Height = 241 Width = 199 end object OutPutWeight: TcxTextEdit Tag = 999 Left = 0 Top = 660 AutoSize = False ParentFont = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -27 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [fsBold] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 33 Visible = False Height = 44 Width = 191 end object cxDBImage1: TcxDBImage Left = 0 Top = 682 Hint = 'FileName' DataBinding.DataField = 'FilesOther' DataBinding.DataSource = DS_IMAGE Properties.GraphicClassName = 'TdxSmartImage' Properties.GraphicTransparency = gtTransparent Properties.ReadOnly = True Properties.ShowFocusRect = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 34 Visible = False Height = 122 Width = 280 end object C_Pattern: TcxTextEdit Left = 0 Top = 704 ParentFont = False Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 35 Visible = False Width = 124 end object RuleYardstick: TcxTextEdit Left = 0 Top = 726 AutoSize = False ParentFont = False Properties.ReadOnly = True Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -13 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 36 Text = '100' Visible = False Height = 29 Width = 69 end object C_StyleNo: TcxTextEdit Left = 0 Top = 748 ParentFont = False Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 37 Visible = False Width = 168 end object customStrField1: TcxTextEdit Left = 0 Top = 770 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 38 Visible = False Width = 121 end object customStrField2: TcxTextEdit Left = 0 Top = 792 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 39 Visible = False Width = 121 end object C_Width: TcxTextEdit Left = 0 Top = 814 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 40 Visible = False Width = 121 end object C_GramWeight: TcxTextEdit Left = 0 Top = 836 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 41 Visible = False Width = 121 end object addLen: TcxTextEdit Left = 0 Top = 858 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 42 Visible = False Width = 121 end object addWet: TcxTextEdit Left = 0 Top = 880 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 43 Visible = False Width = 121 end object bt_printmd: TButton Left = 0 Top = 902 Width = 48 Height = 33 Caption = #30721#21333 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [fsBold] ParentFont = False TabOrder = 44 Visible = False end object presentLen: TcxTextEdit Left = 0 Top = 924 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 45 Visible = False Width = 121 end object presentWeight: TcxTextEdit Left = 0 Top = 946 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 46 Visible = False Width = 121 end object unitPieces: TcxTextEdit Left = 0 Top = 968 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 47 Visible = False Width = 121 end object custName: TcxTextEdit Left = 0 Top = 990 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 48 Visible = False Width = 164 end object ADOQueryBaseCmd: TADOQuery Connection = DataLink_TradeInsp.ADOLink Parameters = <> Left = 607 Top = 72 end object ADOQueryBaseTemp: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 465 Top = 81 end object cds_params: TClientDataSet Aggregates = <> Params = <> Left = 607 Top = 168 object cds_paramsdabao: TStringField FieldName = 'dabao' Size = 10 end object cds_paramspackRolls: TIntegerField FieldName = 'packRolls' end object cds_paramsrollNoMake: TStringField FieldName = 'rollNoMake' end object cds_paramsMinWeight: TIntegerField FieldName = 'MinWeight' end object cds_paramsMaxWeight: TIntegerField FieldName = 'MaxWeight' end object cds_paramslblLenUnit: TStringField FieldName = 'lblLenUnit' end object cds_paramsMinLen: TIntegerField FieldName = 'MinLen' end object cds_paramsmaxLen: TIntegerField FieldName = 'maxLen' end object cds_paramsweightRule: TIntegerField FieldName = 'weightRule' end object cds_paramschen: TStringField FieldName = 'chen' Size = 10 end object cds_paramsmabiao: TStringField FieldName = 'mabiao' end object cds_paramsmbunit: TStringField FieldName = 'mbunit' end object cds_paramsmplace: TIntegerField FieldName = 'mplace' end object cds_paramsyplace: TIntegerField FieldName = 'yplace' end object cds_paramskgplace: TIntegerField FieldName = 'kgplace' end object cds_paramslabNumber: TIntegerField FieldName = 'labNumber' end object cds_paramsoutPage: TStringField FieldName = 'outPage' Size = 10 end object cds_paramsEndPieceNo: TIntegerField FieldName = 'EndPieceNo' end object cds_paramsBeginPieceNo: TIntegerField FieldName = 'BeginPieceNo' end object cds_paramsFixedLength: TIntegerField FieldName = 'FixedLength' end object cds_paramspacknoMake: TStringField FieldName = 'packnoMake' Size = 30 end object cds_paramspieceOrder: TBooleanField FieldName = 'pieceOrder' end object cds_paramsLabVolume: TStringField FieldName = 'LabVolume' Size = 60 end object cds_paramsLabPackage: TStringField FieldName = 'LabPackage' Size = 60 end object cds_paramsAddwetPresent: TFloatField FieldName = 'AddwetPresent' end object cds_paramsAddLenPresent: TFloatField FieldName = 'AddLenPresent' end object cds_paramspackPrintPreview: TBooleanField FieldName = 'packPrintPreview' end object cds_paramspacklabNumber: TIntegerField FieldName = 'packlabNumber' end object cds_paramspackPostAction: TStringField FieldName = 'packPostAction' end end object CDS_2: TClientDataSet Aggregates = <> Params = <> Left = 607 Top = 165 end object DS_2: TDataSource DataSet = CDS_2 Left = 607 Top = 149 end object cds_1: TClientDataSet Aggregates = <> Params = <> Left = 607 Top = 261 end object cds_3: TClientDataSet Aggregates = <> Params = <> Left = 607 Top = 189 end object ds_3: TDataSource DataSet = cds_3 Left = 607 Top = 213 end object ds_1: TDataSource DataSet = cds_1 Left = 607 Top = 197 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 607 Top = 127 end object ADOQueryPrint: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 607 Top = 271 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator] 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_1 CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 607 Top = 271 ReportData = {} end object RMDB_1: TRMDBDataSet Visible = True DataSet = ADOQueryPrint Left = 607 Top = 271 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid3 PopupMenus = <> Left = 607 Top = 104 end object ADOQueryImage: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly CommandTimeout = 300 Parameters = <> Left = 607 Top = 64 end object DS_IMAGE: TDataSource DataSet = ADOQueryImage Left = 555 Top = 21 end object RMRichObject1: TRMRichObject Left = 600 Top = 176 end end