inherited frmMachRollMain_M: TfrmMachRollMain_M Caption = #26426#21488#37197#36135 ClientHeight = 756 ClientWidth = 1443 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Height = -16 FormStyle = fsMDIChild Visible = True ExplicitWidth = 1459 ExplicitHeight = 795 PixelsPerInch = 96 TextHeight = 21 object Panel1: TPanel [0] Left = 0 Top = 0 Width = 499 Height = 756 Align = alLeft TabOrder = 4 object Label1: TLabel Left = 15 Top = 30 Width = 64 Height = 21 Caption = #25195#25551#20837#21475 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label2: TLabel Left = 31 Top = 85 Width = 48 Height = 21 Caption = #25351#31034#21333 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label3: TLabel Left = 47 Top = 119 Width = 32 Height = 21 Caption = #33394#21495 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label4: TLabel Left = 15 Top = 154 Width = 64 Height = 21 Caption = #26579#21378#32568#21495 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label5: TLabel Left = 47 Top = 188 Width = 32 Height = 21 Caption = #25968#37327 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label6: TLabel Left = 271 Top = 85 Width = 32 Height = 21 Caption = #21697#21517 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label7: TLabel Left = 271 Top = 119 Width = 32 Height = 21 Caption = #39068#33394 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label8: TLabel Left = 271 Top = 154 Width = 32 Height = 21 Caption = #21345#21495 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label9: TLabel Left = 33 Top = 259 Width = 42 Height = 28 Caption = #38271#24230 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object lblLenUnit: TLabel Left = 250 Top = 262 Width = 16 Height = 21 Caption = 'M' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label10: TLabel Left = 33 Top = 318 Width = 42 Height = 28 Caption = #37325#37327 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -21 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label11: TLabel Left = 250 Top = 321 Width = 22 Height = 21 Caption = 'KG' Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label12: TLabel Left = 41 Top = 388 Width = 32 Height = 21 Caption = #31995#25968 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object edtScan: TcxTextEdit Tag = 999 Left = 85 Top = 27 Properties.CharCase = ecUpperCase Style.HotTrack = False Style.LookAndFeel.Kind = lfUltraFlat Style.LookAndFeel.SkinName = 'WXI' Style.TransparentBorder = False 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 = 0 OnClick = edtScanEnter OnDblClick = edtScanDblClick OnKeyPress = edtScanKeyPress Width = 384 end object OrderNo: TcxTextEdit Left = 85 Top = 81 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 1 Width = 160 end object ColorNo: TcxTextEdit Left = 85 Top = 115 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 2 Width = 160 end object FtyPCId: TcxTextEdit Left = 85 Top = 150 Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 3 OnClick = edtScanEnter Width = 160 end object Qty: TcxTextEdit Left = 85 Top = 184 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 4 Width = 160 end object BCIOID: TcxTextEdit Left = 309 Top = 150 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 5 Width = 160 end object Color: TcxTextEdit Left = 309 Top = 115 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 6 Width = 160 end object CodeName: TcxTextEdit Left = 309 Top = 81 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 7 Width = 160 end object InputLen: TcxTextEdit Tag = 999 Left = 85 Top = 255 AutoSize = False Properties.ReadOnly = False Properties.OnChange = InputLenPropertiesChange Style.HotTrack = False Style.TransparentBorder = False TabOrder = 8 OnClick = edtScanEnter OnKeyPress = InputLenKeyPress Height = 35 Width = 158 end object InputWeight: TcxTextEdit Tag = 999 Left = 85 Top = 314 AutoSize = False Properties.OnChange = InputLenPropertiesChange Style.HotTrack = False Style.TransparentBorder = False TabOrder = 9 OnClick = edtScanEnter OnKeyPress = InputLenKeyPress Height = 35 Width = 96 end object Tare: TcxTextEdit Tag = 999 Left = 187 Top = 314 AutoSize = False Properties.OnChange = InputLenPropertiesChange Style.HotTrack = False Style.TransparentBorder = False TabOrder = 10 OnClick = edtScanEnter OnKeyPress = InputLenKeyPress Height = 35 Width = 57 end object BTPrint: TButton Left = 309 Top = 314 Width = 150 Height = 59 Caption = #24320' '#35009 TabOrder = 11 OnClick = BTPrintClick end object Coefficient: TcxTextEdit Tag = 999 Left = 83 Top = 381 AutoSize = False Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 12 OnClick = edtScanEnter OnKeyPress = InputLenKeyPress Height = 35 Width = 84 end object lblRuleConversion: TcxComboBox Tag = 2 Left = 187 Top = 381 AutoSize = False Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( #26080#38656#36716#25442 #38271#24230#36716#20844#26020 #20928#37325#36716#38271#24230 '') Properties.OnChange = lblRuleConversionPropertiesChange Style.HotTrack = False Style.LookAndFeel.SkinName = 'WXI' Style.TransparentBorder = False StyleDisabled.LookAndFeel.SkinName = 'WXI' StyleFocused.LookAndFeel.SkinName = 'WXI' StyleHot.LookAndFeel.SkinName = 'WXI' TabOrder = 13 Text = #26080#38656#36716#25442 Height = 35 Width = 102 end object AOrdDefNote1: TcxRichEdit Left = 33 Top = 483 Properties.ReadOnly = True Properties.ScrollBars = ssBoth Style.HotTrack = False Style.TransparentBorder = False TabOrder = 14 Height = 206 Width = 181 end object packnote: TcxMemo Tag = 999 Left = 259 Top = 483 Properties.ReadOnly = True Properties.ScrollBars = ssVertical Style.HotTrack = False Style.TransparentBorder = False TabOrder = 15 Height = 206 Width = 199 end object unitPieces: TcxTextEdit Left = 632 Top = 769 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 16 Visible = False OnClick = edtScanEnter Width = 121 end object presentWeight: TcxTextEdit Left = 632 Top = 725 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 17 Visible = False OnClick = edtScanEnter Width = 121 end object presentLen: TcxTextEdit Left = 632 Top = 703 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 18 Visible = False OnClick = edtScanEnter Width = 121 end object bt_printmd: TButton Left = 632 Top = 681 Width = 48 Height = 33 Caption = #30721#21333 TabOrder = 19 Visible = False OnClick = bt_printmdClick end object addWet: TcxTextEdit Left = 632 Top = 659 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 20 Visible = False OnClick = edtScanEnter Width = 121 end object addLen: TcxTextEdit Left = 632 Top = 637 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 21 Visible = False OnClick = edtScanEnter Width = 121 end object C_GramWeight: TcxTextEdit Left = 632 Top = 615 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 22 Visible = False OnClick = edtScanEnter Width = 121 end object C_Width: TcxTextEdit Left = 632 Top = 593 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 23 Visible = False OnClick = edtScanEnter Width = 121 end object customStrField2: TcxTextEdit Left = 632 Top = 571 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 24 Visible = False OnClick = edtScanEnter Width = 121 end object customStrField1: TcxTextEdit Left = 632 Top = 549 Style.HotTrack = False Style.TransparentBorder = False TabOrder = 25 Visible = False OnClick = edtScanEnter Width = 121 end object C_StyleNo: TcxTextEdit Left = 680 Top = 505 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 26 Visible = False Width = 168 end object RuleYardstick: TcxTextEdit Left = 632 Top = 505 AutoSize = False Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 27 Text = '100' Visible = False OnClick = edtScanEnter OnKeyPress = InputLenKeyPress Height = 29 Width = 69 end object C_Pattern: TcxTextEdit Left = 632 Top = 483 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 28 Visible = False Width = 124 end object OutPutWeight: TcxTextEdit Tag = 999 Left = 632 Top = 439 AutoSize = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 29 Visible = False OnClick = edtScanEnter OnKeyPress = InputLenKeyPress Height = 44 Width = 191 end object cxDBImage1: TcxDBImage Left = 592 Top = 263 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 = 30 Visible = False Height = 122 Width = 280 end object Button1: TButton Left = 309 Top = 244 Width = 150 Height = 59 Caption = #20986' '#24211 TabOrder = 31 Visible = False OnClick = Button1Click end object ToolButton2: TButton Left = 309 Top = 388 Width = 150 Height = 68 Caption = #25171#21360#24211#23384#26631#31614 TabOrder = 32 Visible = False OnClick = ToolButton2Click end end object Panel_right: TPanel [1] Left = 499 Top = 0 Width = 944 Height = 756 Align = alClient Caption = 'Panel_right' DoubleBuffered = False ParentDoubleBuffered = False TabOrder = 3 object cxGrid2: TcxGrid Left = 1 Top = 1 Width = 942 Height = 421 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 = < item Format = '0' Position = spFooter end item Format = '0' Position = spFooter Column = v1PRTOrderQty end item Format = '0' Position = spFooter end> DataController.Summary.FooterSummaryItems = < item Kind = skSum Column = v1PRTOrderQty end item Kind = skSum end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsBehavior.GoToNextCellOnEnter = True OptionsBehavior.FocusCellOnCycle = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsSelection.CheckBoxVisibility = [cbvDataRow] OptionsView.Footer = True OptionsView.GroupByBox = False object cxGridDBColumn1: TcxGridDBColumn Tag = 99 Caption = #36873#25321 DataBinding.FieldName = 'SSel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Visible = False HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 66 end object TV2Column3: TcxGridDBColumn Caption = #35746#21333#21495 DataBinding.FieldName = 'TMMNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 96 end object TV2Column4: TcxGridDBColumn Caption = #23458#25143 DataBinding.FieldName = 'CustName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 72 end object TV2Column1: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'C_Code' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 93 end object TV2Column2: TcxGridDBColumn Caption = #33394#24067#21517#31216 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 91 end object v1PRTColor: TcxGridDBColumn Caption = #39068#33394 DataBinding.FieldName = 'C_Color' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxButtonEditProperties' Properties.Buttons = < item Default = True Kind = bkEllipsis end> Properties.ReadOnly = False HeaderAlignmentHorz = taCenter Options.Editing = False Width = 79 end object TV2Column5: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'C_ColorNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 60 end object TV2Column7: TcxGridDBColumn Caption = #25253#21333#25968 DataBinding.FieldName = 'OrderQty' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 76 end object TV2Column8: TcxGridDBColumn Caption = #25253#21333#21333#20301 DataBinding.FieldName = 'OrderUnit' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 78 end object v1PRTOrderQty: TcxGridDBColumn Caption = #27424#21333#25968 DataBinding.FieldName = 'OrderOweQty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 84 end object v1OrderUnit: TcxGridDBColumn Caption = #24211#23384#21333#20301 DataBinding.FieldName = 'TMSUnit' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxComboBoxProperties' Properties.Items.Strings = ( 'M' 'Y' 'Kg') HeaderAlignmentHorz = taCenter Options.Editing = False Width = 110 end object cxGridDBColumn7: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'OrdSNote' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 66 end end object cxGridLevel1: TcxGridLevel GridView = TV2 end end object Panel2: TPanel Left = 1 Top = 422 Width = 942 Height = 333 Align = alBottom TabOrder = 1 object cxGrid3: TcxGrid Tag = 9999 Left = 1 Top = 31 Width = 940 Height = 301 Align = alClient TabOrder = 0 object Tv3: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnCustomDrawCell = Tv3CustomDrawCell 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 end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum 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 tv3CIID: TcxGridDBColumn Caption = #21367#26465#30721 DataBinding.FieldName = 'BCIOID' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Options.Sorting = False Width = 112 end object Tv3Column1: TcxGridDBColumn Caption = #24211#20301 DataBinding.FieldName = 'StkCoName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 60 end end object cxGridLevel2: TcxGridLevel GridView = Tv3 end end object ToolBar2: TToolBar Tag = 1000 Left = 1 Top = 1 Width = 940 Height = 30 AutoSize = True ButtonHeight = 30 ButtonWidth = 99 Caption = 'ToolBar1' DoubleBuffered = False EdgeInner = esNone EdgeOuter = esNone Images = DataLink_TradeInsp.cxImageList_bar List = True ParentDoubleBuffered = False ShowCaptions = True TabOrder = 1 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #37325#25171 ImageIndex = 21 OnClick = ToolButton3Click end object Trolldel: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 5 OnClick = TrolldelClick end object ToolButton1: TToolButton Left = 142 Top = 0 AutoSize = True Caption = #25171#21367#35774#32622 ImageIndex = 25 OnClick = ToolButton1Click end object Tlog: TToolButton Left = 245 Top = 0 AutoSize = True Caption = #26085#24535 ImageIndex = 30 end object ToolButton8: TToolButton Left = 316 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = ToolButton8Click end end end end object cxGroupBox_keys: TcxGroupBox [2] Left = 778 Top = 61 Caption = #34394#25311#38190#30424 Style.LookAndFeel.NativeStyle = False StyleDisabled.LookAndFeel.NativeStyle = False TabOrder = 2 Transparent = True Visible = False Height = 285 Width = 327 inline FrameKeyBoard1: TFrameKeyBoard Left = 2 Top = 26 Width = 323 Height = 257 Align = alClient TabOrder = 0 ExplicitLeft = 2 ExplicitTop = 26 ExplicitWidth = 323 ExplicitHeight = 257 inherited dxPanel1: TdxPanel Width = 323 Height = 257 ExplicitWidth = 323 ExplicitHeight = 257 inherited SpeedButton1: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton4: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton7: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton2: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton5: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton8: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton3: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton6: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton9: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_back: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton0: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_dot: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_yc: TSpeedButton OnClick = FrameKeyBoard1SpeedButton_ycClick end inherited SpeedButton_zdykey2: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_zdykey1: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton10: TSpeedButton OnClick = FrameKeyBoard1SpeedButton1Click end end end object MovePanel1: TMovePanel Left = 79 Top = -28 Width = 237 Height = 45 BevelOuter = bvNone DockSite = True ParentBackground = False TabOrder = 1 end end inherited loadProcess: TPanel Left = 560 Top = 326 Width = 177 ExplicitLeft = 560 ExplicitTop = 326 ExplicitWidth = 177 end inherited cxProgressBar2: TcxProgressBar Left = 560 Top = 238 ExplicitLeft = 560 ExplicitTop = 238 ExplicitHeight = 29 end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TradeInsp.ADOLink Left = 456 Top = 311 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TradeInsp.ADOLink Left = 539 Top = 311 end object cds_params: TClientDataSet Aggregates = <> Params = <> Left = 788 Top = 361 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 = 622 Top = 361 end object DS_2: TDataSource DataSet = CDS_2 Left = 622 Top = 411 end object cds_1: TClientDataSet Aggregates = <> Params = <> Left = 539 Top = 361 end object cds_3: TClientDataSet Aggregates = <> Params = <> Left = 705 Top = 361 end object ds_3: TDataSource DataSet = cds_3 Left = 705 Top = 411 end object ds_1: TDataSource DataSet = cds_1 Left = 539 Top = 411 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 705 Top = 311 end object ADOQueryPrint: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 788 Top = 311 end object GPM_3: TcxGridPopupMenu PopupMenus = <> Left = 456 Top = 411 end object ADOQueryImage: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly CommandTimeout = 300 Parameters = <> Left = 622 Top = 303 end object DS_IMAGE: TDataSource DataSet = ADOQueryImage Left = 788 Top = 411 end object ADO_CJ: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 456 Top = 361 end object fRMDB_1: TfrxDBDataset UserName = 'fRMDB_1' CloseDataSource = False DataSet = ADOQueryPrint BCDToCurrency = False Left = 539 Top = 461 end object frxReport1: TfrxReport Version = '6.9.12' DataSet = fRMDB_1 DataSetName = 'fRMDB_1' DotMatrixReport = False IniFile = '\Software\Fast Reports' PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick, pbCopy, pbSelection] PreviewOptions.Zoom = 1.000000000000000000 PrintOptions.Printer = 'Default' PrintOptions.PrintOnSheet = 0 ReportOptions.CreateDate = 45471.682319444440000000 ReportOptions.LastChange = 45471.682319444440000000 ScriptLanguage = 'PascalScript' ScriptText.Strings = ( 'begin' '' 'end.') ShowProgress = False Left = 788 Top = 461 Datasets = <> Variables = <> Style = <> object Data: TfrxDataPage Height = 1000.000000000000000000 Width = 1000.000000000000000000 end object Page1: TfrxReportPage PaperWidth = 70.000000000000000000 PaperHeight = 50.000000000000000000 PaperSize = 256 LeftMargin = 10.000000000000000000 RightMargin = 10.000000000000000000 TopMargin = 10.000000000000000000 BottomMargin = 10.000000000000000000 Frame.Typ = [] MirrorMode = [] end end object frxPPTXExport1: TfrxPPTXExport UseFileCache = True ShowProgress = True OverwritePrompt = False DataOnly = False OpenAfterExport = False PictureType = gpPNG Left = 705 Top = 461 end object frxXLSXExport1: TfrxXLSXExport UseFileCache = True ShowProgress = True OverwritePrompt = False DataOnly = False ChunkSize = 0 OpenAfterExport = False PictureType = gpPNG Left = 622 Top = 511 end object frxReportTableObject1: TfrxReportTableObject Left = 456 Top = 511 end object frxOLEObject1: TfrxOLEObject Left = 622 Top = 461 end object frxRichObject1: TfrxRichObject Left = 539 Top = 511 end object frxBarCodeObject1: TfrxBarCodeObject Left = 456 Top = 461 end object ADO_2: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 884 Top = 383 end end