object stgResultForm: TstgResultForm Left = 192 Top = 123 Width = 1305 Height = 675 ActiveControl = zgGatherTree BorderIcons = [biSystemMenu, biMaximize] Caption = #20998#21253#27719#24635 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poMainFormCenter PixelsPerInch = 96 TextHeight = 13 object jpsResult: TJimPages Left = 0 Top = 22 Width = 1297 Height = 594 ActivePage = jpsResultBillsDetail ActivePageIndex = 0 Align = alClient Caption = 'jpsResult' object jpsResultBillsDetail: TJimPage Left = 0 Top = 0 Width = 1297 Height = 594 TabName = 'BillsDetail' Caption = 'Tree' object Splitter1: TSplitter Left = 924 Top = 0 Height = 594 Align = alRight end object pnlGatherTree: TPanel Left = 0 Top = 0 Width = 924 Height = 594 Align = alClient BevelOuter = bvNone TabOrder = 0 object zgGatherTree: TZJGrid Left = 0 Top = 0 Width = 924 Height = 594 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection, goShowTreeLine] OptionsEx = [] ColCount = 7 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 OnCellGetColor = zgGatherTreeCellGetColor OnMouseDown = zgGatherTreeMouseDown Align = alClient end end object pnlDetail: TPanel Left = 927 Top = 0 Width = 370 Height = 594 Align = alRight BevelOuter = bvNone TabOrder = 1 object zgBillsDetail: TZJGrid Left = 0 Top = 0 Width = 370 Height = 594 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 Align = alClient end end end object jpsResultErrorDetail: TJimPage Left = 0 Top = 0 Width = 1297 Height = 594 TabName = 'ErrorDetail' Caption = 'Main' object pnlError: TPanel Left = 0 Top = 0 Width = 1297 Height = 594 Align = alClient BevelOuter = bvNone TabOrder = 0 object Splitter2: TSplitter Left = 440 Top = 0 Height = 594 end object pnlErrorInfo: TPanel Left = 0 Top = 0 Width = 440 Height = 594 Align = alLeft BevelOuter = bvNone TabOrder = 0 object zgErrorInfo: TZJGrid Left = 0 Top = 0 Width = 440 Height = 594 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 3 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 OnMouseDown = zgErrorInfoMouseDown Align = alClient end end object pnlErrorDetail: TPanel Left = 443 Top = 0 Width = 854 Height = 594 Align = alClient BevelOuter = bvNone TabOrder = 1 object zgErrorDetail: TZJGrid Left = 0 Top = 0 Width = 854 Height = 594 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 6 RowCount = 6 FixedRowCount = 2 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 Align = alClient end end end end end object jtsGatherData: TJimTabSet Left = 0 Top = 0 Width = 1297 Height = 22 Align = alTop BackgroundColor = clGradientInactiveCaption Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'smartSimSun' Font.Style = [] SelectedColor = clWhite XPSelectedColor = clWhite XPUnSelectedColor = 15200496 Tabs.Strings = ( #27719#24635#32467#26524 #38169#35823#21015#34920) TabIndex = 0 TabPosition = jtpTop TabStyle = tdsNew UnselectedColor = 15200496 OnChange = jtsGatherDataChange end object pnlResult: TPanel Left = 0 Top = 616 Width = 1297 Height = 28 Align = alBottom BevelOuter = bvNone TabOrder = 2 Visible = False object lblResult: TLabel Left = 4 Top = 8 Width = 692 Height = 13 Caption = #20849#27719#24635'3'#20010#26631#27573#25968#25454#65292#20849#27719#24635#24037#31243#37327#28165#21333'X'#26465#65292#20854#20013'Y'#26465#27491#30830#27719#24635#65292#35813#37096#20998#21487#27491#30830#23548#20837#24635#21253#65292#26410#27491#30830#27719#24635#28165#21333#21487#35265#28165#21333#26126#32454#20013#28784#33394#37096#20998 end end object saGatherTree: TsdGridTreeDBA Columns = < item Title.Caption = #39033#30446#33410#32534#21495 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'Code' Width = 180 ReadOnly = False end item Title.Caption = #28165#21333#32534#21495 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'B_Code' Width = 80 ReadOnly = False end item Title.Caption = #21517#31216 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'Name' Width = 240 ReadOnly = False end item Title.Caption = #21333#20301 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taCenter Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'Units' Width = 50 ReadOnly = False end item Title.Caption = 'ID' Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'ID' Visible = False ReadOnly = False end item Title.Caption = 'ParentID' Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'ParentID' Visible = False ReadOnly = False end item Title.Caption = 'NextSiblingID' Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'NextSiblingID' Visible = False ReadOnly = False end item Title.Caption = #21512#21516#35745#37327 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'DealQuantity' ReadOnly = False end item Title.Caption = #25968#37327#21464#26356#35745#37327 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'QcQuantity' ReadOnly = False end> Grid = zgGatherTree ExtendRowCount = 0 Options = [] AutoExpand = True KeyFieldName = 'ID' ParentFieldName = 'ParentID' NextSiblingFieldName = 'NextSiblingID' TreeOptions = [] TopLevelBold = True Left = 104 Top = 110 end object sdBillsDetail: TsdGridDBA Columns = < item Title.Caption = #26631#27573 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'TenderName' ReadOnly = False end item Title.Caption = #20301#32622 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taCenter Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'SerialNo' Width = 50 ReadOnly = False end item Title.Caption = #21512#21516#35745#37327 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'DealQuantity' Width = 85 ReadOnly = False end item Title.Caption = #25968#37327#21464#26356#35745#37327 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'QcQuantity' Width = 85 ReadOnly = False end> Grid = zgBillsDetail ExtendRowCount = 0 Options = [] Left = 157 Top = 110 end object sdErrorInfo: TsdGridDBA Columns = < item Title.Caption = #21517#31216 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'Name' Width = 300 ReadOnly = False end item Title.Caption = #26410#27491#30830#27719#24635 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'ErrorCount' Width = 80 ReadOnly = False end> Grid = zgErrorInfo ExtendRowCount = 0 Options = [] Left = 104 Top = 196 end object sdErrorDetail: TsdGridDBA Columns = < item Title.Caption = #20986#38169#28304'|'#32534#21495 Title.CaptionAcrossCols = '2' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'RelaCode' ReadOnly = False end item Title.Caption = '|'#20301#32622 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taCenter Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'RelaSerialNo' Width = 50 ReadOnly = False end item Title.Caption = #21487#35745#37327#28165#21333'|'#32534#21495 Title.CaptionAcrossCols = '2' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'DetailCode' ReadOnly = False end item Title.Caption = '|'#20301#32622 Title.CaptionAcrossCols = '1' Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taCenter Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'DetailSerialNo' Width = 50 ReadOnly = False end item Title.Caption = #38169#35823#31867#22411 Title.CaptionAcrossCols = '1' Title.CaptionAcrossRows = 2 Title.Font.Charset = GB2312_CHARSET Title.Font.Color = clWindowText Title.Font.Height = -12 Title.Font.Name = #23435#20307 Title.Font.Style = [] Alignment = taLeftJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'ErrorType' Width = 200 ReadOnly = False end> Grid = zgErrorDetail ExtendRowCount = 0 Options = [] Left = 160 Top = 195 end object dxpmError: TdxBarPopupMenu BarManager = MainForm.dxBarManager ItemLinks = < item Item = MainForm.dxbtnExportTenderError Visible = True end item Item = MainForm.dxbtnExportAllError Visible = True end> UseOwnFont = False OnPopup = dxpmErrorPopup Left = 104 Top = 235 end object dxpmGatherTree: TdxBarPopupMenu BarManager = MainForm.dxBarManager ItemLinks = < item Item = MainForm.dxbtnExportStgResult Visible = True end item Item = MainForm.dxbtnExportStgResultExcel Visible = True end> UseOwnFont = False OnPopup = dxpmGatherTreePopup Left = 104 Top = 148 end object alStgResult: TActionList Images = MainForm.Images Left = 256 Top = 110 object actnExportAllError: TAction Caption = #23548#20986#20840#37096#38169#35823#20449#24687 ImageIndex = 13 OnExecute = actnExportAllErrorExecute end object actnExportTenderError: TAction Caption = #23548#20986#21333#26631#27573#38169#35823#20449#24687 ImageIndex = 13 OnExecute = actnExportTenderErrorExecute end object actnExportStgResultExcel: TAction Caption = #23548#20986#20998#21253#27719#24635'Excel'#26684#24335 ImageIndex = 13 OnExecute = actnExportStgResultExcelExecute end object actnExportStgResult: TAction Caption = #23548#20986#20998#21253#27719#24635#36719#20214#26684#24335 ImageIndex = 28 OnExecute = actnExportStgResultExecute end end end