inherited frmMachRollMain: TfrmMachRollMain Caption = #26426#21488#26816#39564 ClientHeight = 768 ClientWidth = 1443 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Height = -16 FormStyle = fsMDIChild Visible = True ExplicitWidth = 1459 ExplicitHeight = 807 PixelsPerInch = 96 TextHeight = 21 object Panel1: TPanel [0] Left = 0 Top = 0 Width = 490 Height = 768 Align = alLeft TabOrder = 4 OnClick = Panel1Click 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 = 360 Top = 699 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 Visible = False end object Label3: TLabel Left = 249 Top = 67 Width = 64 Height = 21 Caption = #33394#21495#39068#33394 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 = 13 Top = 104 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 = 143 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 = 52 Top = 69 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 = 381 Top = 730 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 Visible = False end object Label8: TLabel Left = 276 Top = 100 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 = 196 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 = 199 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 = 255 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 = 258 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 = 325 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 Label18: TLabel Left = 244 Top = 143 Width = 64 Height = 21 Caption = #35745#20215#21333#20301 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 = 223 end object OrderNo: TcxTextEdit Left = 414 Top = 695 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 1 Visible = False Width = 160 end object ColorNo: TcxTextEdit Left = 319 Top = 61 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 2 OnClick = ColorNoClick Width = 160 end object FtyPCId: TcxTextEdit Left = 83 Top = 102 Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 3 OnClick = edtScanEnter Width = 160 end object Qty: TcxTextEdit Left = 85 Top = 139 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 4 Width = 160 end object BCIOID: TcxTextEdit Left = 319 Top = 100 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 5 Width = 160 end object Color: TcxTextEdit Left = 414 Top = 726 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 6 Visible = False Width = 160 end object CodeName: TcxTextEdit Left = 85 Top = 65 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 7 Width = 160 end object InputLen: TcxTextEdit Tag = 999 Left = 85 Top = 192 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 = 251 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 = 251 AutoSize = False Properties.OnChange = InputLenPropertiesChange Style.HotTrack = False Style.TransparentBorder = False TabOrder = 10 Text = '0.3' OnClick = edtScanEnter OnKeyPress = InputLenKeyPress Height = 35 Width = 57 end object BTPrint: TButton Left = 309 Top = 251 Width = 150 Height = 59 Caption = #24320#35009#20986#24211 TabOrder = 11 OnClick = BTPrintClick end object Coefficient: TcxTextEdit Tag = 999 Left = 83 Top = 318 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 = 175 Top = 318 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 = 427 Top = 483 Properties.ReadOnly = True Properties.ScrollBars = ssBoth Style.HotTrack = False Style.TransparentBorder = False TabOrder = 14 Visible = False Height = 206 Width = 181 end object packnote: TcxMemo Tag = 999 Left = 427 Top = 483 Properties.ReadOnly = True Properties.ScrollBars = ssVertical Style.HotTrack = False Style.TransparentBorder = False TabOrder = 15 Visible = False 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 = 186 Width = 150 Height = 59 Caption = #25972#20214#20986#24211 TabOrder = 31 OnClick = Button1Click end object ToolButton2: TButton Left = 288 Top = 325 Width = 120 Height = 68 Caption = #25171#21360#24211#23384#26631#31614 TabOrder = 32 OnClick = ToolButton2Click end object GroupBox1: TGroupBox Left = 13 Top = 433 Width = 380 Height = 235 Caption = #23458#25143#36864#20179 TabOrder = 33 Visible = False OnClick = GroupBox1Click object Label13: TLabel Left = 18 Top = 36 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 Label14: TLabel Left = 18 Top = 78 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 Label15: TLabel Left = 18 Top = 229 Width = 32 Height = 21 Caption = #32534#21495 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False Visible = False end object Label16: TLabel Left = 18 Top = 153 Width = 32 Height = 21 Caption = #21333#20301 Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object Label17: TLabel Left = 18 Top = 114 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 C_CODE: TcxTextEdit Left = 56 Top = 227 Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 0 Visible = False Width = 160 end object C_NAME2: TcxComboBox Tag = 2 Left = 42 Top = 228 AutoSize = False Properties.Items.Strings = ( #26080#38656#36716#25442 #38271#24230#36716#20844#26020 #20928#37325#36716#38271#24230 '') Style.HotTrack = False Style.LookAndFeel.SkinName = 'WXI' Style.TransparentBorder = False StyleDisabled.LookAndFeel.SkinName = 'WXI' StyleFocused.LookAndFeel.SkinName = 'WXI' StyleHot.LookAndFeel.SkinName = 'WXI' TabOrder = 1 Visible = False OnClick = C_NAME2Click OnEnter = C_NAME2Enter Height = 35 Width = 162 end object DUNIT: TcxTextEdit Left = 56 Top = 153 Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 2 OnClick = edtScanEnter Width = 160 end object C_COLOR: TcxTextEdit Left = 56 Top = 114 Properties.ReadOnly = False Style.HotTrack = False Style.TransparentBorder = False TabOrder = 3 OnClick = edtScanEnter Width = 160 end object C_NAME: TcxTextEdit Left = 56 Top = 33 Properties.ReadOnly = False Properties.OnChange = C_NAMEPropertiesChange Style.HotTrack = False Style.TransparentBorder = False TabOrder = 4 OnClick = C_NAMEClick Width = 160 end object CRTYPE: TcxComboBox Tag = 2 Left = 56 Top = 186 AutoSize = False Properties.DropDownListStyle = lsEditFixedList Properties.Items.Strings = ( #36864#36135#22238#20179 #30424#28857#22238#20179) 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 = 5 Text = #36864#36135#22238#20179 Height = 35 Width = 102 end object Button2: TButton Left = 222 Top = 40 Width = 150 Height = 68 Caption = #36864#36135#22238#20179#25171#21360 TabOrder = 6 Visible = False OnClick = Button2Click end object C_COLORNO: TcxTextEdit Left = 56 Top = 74 Properties.ReadOnly = False Properties.OnChange = c_colornoPropertiesChange Style.HotTrack = False Style.TransparentBorder = False TabOrder = 7 OnClick = C_COLORNOClick Width = 160 end end object Button3: TButton Left = 15 Top = 359 Width = 120 Height = 68 Caption = #22238#20179#25171#21360 TabOrder = 34 OnClick = Button3Click end object CICUNIT: TcxTextEdit Left = 319 Top = 139 Properties.ReadOnly = True Style.HotTrack = False Style.TransparentBorder = False TabOrder = 35 Width = 160 end object Panel3: TPanel Left = 69 Top = 496 Width = 252 Height = 400 Caption = 'Panel3' TabOrder = 36 Visible = False object cxGrid1: TcxGrid Tag = 9999 Left = 1 Top = 1 Width = 250 Height = 398 Align = alClient TabOrder = 0 object TV1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnCellClick = TV1CellClick DataController.DataSource = DS_4 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 end item Kind = skSum end item Format = #21367#25968':0' Kind = skCount end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum 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.GroupByBox = False object cxGridDBColumn2: TcxGridDBColumn Caption = #21697#21517 DataBinding.FieldName = 'C_Name' DataBinding.IsNullValueType = True FixedKind = fkLeftDynamic HeaderAlignmentHorz = taCenter Options.Editing = False Width = 248 end end object cxGridLevel3: TcxGridLevel GridView = TV1 end end end object cxTextEdit1: TcxTextEdit Tag = 999 Left = 414 Top = 334 AutoSize = False ParentFont = False Properties.ReadOnly = False Style.Font.Charset = ANSI_CHARSET Style.Font.Color = clWindowText Style.Font.Height = -40 Style.Font.Name = #24494#36719#38597#40657 Style.Font.Style = [] Style.HotTrack = False Style.TransparentBorder = False Style.IsFontAssigned = True TabOrder = 37 Text = #8730 OnClick = cxTextEdit1Click OnKeyPress = InputLenKeyPress Height = 59 Width = 50 end object Button4: TButton Left = 162 Top = 359 Width = 120 Height = 68 Caption = #21512#21305 TabOrder = 38 OnClick = Button4Click end object CheckBox1: TCheckBox Left = 319 Top = 34 Width = 140 Height = 17 Caption = #36830#32493#25972#20214#20986#24211 TabOrder = 39 end object Panel5: TPanel Left = 69 Top = 535 Width = 252 Height = 400 Caption = 'Panel3' TabOrder = 40 Visible = False object cxGrid5: TcxGrid Tag = 9999 Left = 1 Top = 1 Width = 250 Height = 398 Align = alClient TabOrder = 0 object TV5: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> OnCellClick = TV5CellClick DataController.DataSource = DS_5 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 end item Kind = skSum end item Format = #21367#25968':0' Kind = skCount end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum 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.GroupByBox = False object cxGridDBColumn4: TcxGridDBColumn Caption = #33394#21495 DataBinding.FieldName = 'C_colorno' DataBinding.IsNullValueType = True FixedKind = fkLeftDynamic HeaderAlignmentHorz = taCenter Options.Editing = False Width = 248 end end object cxGridLevel5: TcxGridLevel GridView = TV5 end end end end object Panel_right: TPanel [1] Left = 490 Top = 0 Width = 953 Height = 768 Align = alClient Caption = 'Panel_right' DoubleBuffered = False ParentDoubleBuffered = False TabOrder = 3 object cxGrid2: TcxGrid Left = 1 Top = 1 Width = 951 Height = 433 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 OptionsView.Footer = True OptionsView.GroupByBox = False Styles.Content = cxStyle1 Styles.IncSearch = cxStyle1 Styles.Header = cxStyle1 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 TV2Column11: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'ssel' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked HeaderAlignmentHorz = taCenter Width = 59 end object TV2Column3: TcxGridDBColumn Caption = #35746#21333#21495 DataBinding.FieldName = 'TMMNo' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 65 end object TV2Column4: TcxGridDBColumn Caption = #23458#25143 DataBinding.FieldName = 'CustName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 58 end object TV2Column1: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'C_Code' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 85 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 = 64 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 = 'OweQty' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 68 end object TV2Column10: TcxGridDBColumn Caption = #24212#37197#25968#37327 DataBinding.FieldName = 'TMSQty' DataBinding.IsNullValueType = True Width = 76 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 = 74 end object TV2Column6: TcxGridDBColumn Caption = #35745#20215#21333#20301 DataBinding.FieldName = 'TMSUnit' DataBinding.IsNullValueType = True Width = 75 end object TV2Column9: TcxGridDBColumn Caption = #24050#37197#25968#37327 DataBinding.FieldName = 'OutQty' DataBinding.IsNullValueType = True Width = 79 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 = 434 Width = 951 Height = 333 Align = alBottom TabOrder = 1 object cxGrid3: TcxGrid Tag = 9999 Left = 1 Top = 31 Width = 949 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 object Tv3Column2: TcxGridDBColumn Caption = #20986#21040#37197#36135#21333 DataBinding.FieldName = 'tmmno' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 100 end end object cxGridLevel2: TcxGridLevel GridView = Tv3 end end object ToolBar2: TToolBar Tag = 1000 Left = 1 Top = 1 Width = 949 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 ToolButton4: TToolButton Left = 316 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 37 OnClick = ToolButton4Click end object ToolButton8: TToolButton Left = 419 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = ToolButton8Click end end end end object cxGroupBox_keys: TcxGroupBox [2] Left = 496 Top = 119 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 Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton4: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton7: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton2: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton5: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton8: TSpeedButton Top = 126 Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click ExplicitTop = 126 end inherited SpeedButton3: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton6: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton9: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_back: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton_backClick end inherited SpeedButton0: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_dot: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_yc: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton_ycClick end inherited SpeedButton_zdykey2: TSpeedButton Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click end inherited SpeedButton_zdykey1: TSpeedButton Left = 247 Top = 126 Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click ExplicitLeft = 247 ExplicitTop = 126 end inherited SpeedButton10: TSpeedButton Left = 252 Top = 191 Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click ExplicitLeft = 252 ExplicitTop = 191 end inherited SpeedButton11: TSpeedButton Top = 192 Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click ExplicitTop = 192 end inherited SpeedButton12: TSpeedButton Left = 64 Top = 191 Font.Charset = ANSI_CHARSET Font.Height = -16 Font.Name = #24494#36719#38597#40657 OnClick = FrameKeyBoard1SpeedButton1Click ExplicitLeft = 64 ExplicitTop = 191 end end end end inherited loadProcess: TPanel Left = 524 Top = 535 Width = 177 ExplicitLeft = 524 ExplicitTop = 535 ExplicitWidth = 177 end inherited cxProgressBar2: TcxProgressBar Left = 560 Top = 238 ExplicitLeft = 560 ExplicitTop = 238 ExplicitHeight = 29 end object Panel4: TPanel [5] Left = 69 Top = 433 Width = 283 Height = 400 TabOrder = 5 Visible = False object Label19: TLabel Left = 5 Top = 80 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 Visible = False end object Label20: TLabel Left = 5 Top = 35 Width = 80 Height = 21 Caption = #21512#21040#26465#30721#65306 Font.Charset = ANSI_CHARSET Font.Color = clRed Font.Height = -16 Font.Name = #24494#36719#38597#40657 Font.Style = [] ParentFont = False end object SCAN2: TcxTextEdit Tag = 999 Left = 75 Top = 75 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 Visible = False OnKeyPress = SCAN2KeyPress Width = 200 end object cxGrid4: TcxGrid Tag = 9999 Left = 1 Top = 144 Width = 281 Height = 255 Align = alBottom TabOrder = 1 object TV4: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> ScrollbarAnnotations.CustomAnnotations = <> DataController.DataSource = DS_HP 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 end item Kind = skSum end item Format = #21367#25968':0' Kind = skCount end item Kind = skSum end item Kind = skSum end item Kind = skSum end item Kind = skSum 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.GroupByBox = False object TV4Column2: TcxGridDBColumn Caption = #26465#30721 DataBinding.FieldName = 'bCIoid' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 91 end object cxGridDBColumn3: TcxGridDBColumn Caption = #25968#37327 DataBinding.FieldName = 'stkqty' DataBinding.IsNullValueType = True FixedKind = fkLeftDynamic HeaderAlignmentHorz = taCenter Options.Editing = False Width = 89 end object TV4Column1: TcxGridDBColumn Caption = #21333#20301 DataBinding.FieldName = 'qtyunit' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 83 end end object cxGridLevel4: TcxGridLevel GridView = TV4 end end object Button5: TButton Left = 5 Top = 69 Width = 120 Height = 68 Caption = #30830#35748#21512#21305 TabOrder = 2 OnClick = Button5Click end object Button6: TButton Left = 154 Top = 67 Width = 120 Height = 68 Caption = #20851#38381 TabOrder = 3 OnClick = Button6Click end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_TradeInsp.ADOLink Left = 386 Top = 640 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_TradeInsp.ADOLink Left = 721 Top = 654 end object cds_params: TClientDataSet Aggregates = <> Params = <> Left = 864 Top = 61 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 = 620 Top = 658 end object DS_2: TDataSource DataSet = CDS_2 Left = 584 Top = 63 end object cds_1: TClientDataSet Aggregates = <> Params = <> Left = 678 Top = 643 end object cds_3: TClientDataSet Aggregates = <> Params = <> Left = 673 Top = 83 end object ds_3: TDataSource DataSet = cds_3 Left = 938 Top = 76 end object ds_1: TDataSource DataSet = cds_1 Left = 504 Top = 662 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 851 Top = 654 end object ADOQueryPrint: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 808 Top = 63 end object GPM_3: TcxGridPopupMenu Grid = cxGrid3 PopupMenus = <> Left = 1063 Top = 518 end object ADOQueryImage: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly CommandTimeout = 300 Parameters = <> Left = 787 Top = 640 end object DS_IMAGE: TDataSource DataSet = ADOQueryImage Left = 1078 Top = 258 end object ADO_CJ: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 434 Top = 632 end object fRMDB_1: TfrxDBDataset UserName = 'fRMDB_1' CloseDataSource = False DataSet = ADOQueryPrint BCDToCurrency = False Left = 530 Top = 647 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 = 1113 Top = 409 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 = 748 Top = 57 end object frxXLSXExport1: TfrxXLSXExport UseFileCache = True ShowProgress = True OverwritePrompt = False DataOnly = False ChunkSize = 0 OpenAfterExport = False PictureType = gpPNG Left = 675 Top = 47 end object frxReportTableObject1: TfrxReportTableObject Left = 447 Top = 677 end object frxOLEObject1: TfrxOLEObject Left = 626 Top = 69 end object frxRichObject1: TfrxRichObject Left = 549 Top = 647 end object frxBarCodeObject1: TfrxBarCodeObject Left = 473 Top = 669 end object ADO_2: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 1087 Top = 362 end object ADO_PM: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 348 Top = 649 end object ADO_YS: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 414 Top = 670 end object CDS_4: TClientDataSet Aggregates = <> Params = <> Left = 573 Top = 496 end object DS_4: TDataSource DataSet = CDS_4 Left = 667 Top = 497 end object ADO_4: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 782 Top = 543 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid2 PopupMenus = <> Left = 1064 Top = 297 end object cxStyleRepository1: TcxStyleRepository PixelsPerInch = 96 object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] end end object DS_YS: TDataSource DataSet = ADO_YS Left = 460 Top = 481 end object DS_HP: TDataSource DataSet = CDS_HP Left = 735 Top = 451 end object CDS_HP: TClientDataSet Aggregates = <> Params = <> Left = 642 Top = 451 end object CDS_5: TClientDataSet Aggregates = <> Params = <> Left = 573 Top = 576 end object DS_5: TDataSource DataSet = CDS_5 Left = 659 Top = 577 end object ADO_5: TADOQuery Connection = DataLink_TradeInsp.ADOLink LockType = ltReadOnly Parameters = <> Left = 726 Top = 575 end end