object PriceMarginBillsFrame: TPriceMarginBillsFrame Left = 0 Top = 0 Width = 1178 Height = 645 TabOrder = 0 object pnlBills: TPanel Left = 0 Top = 0 Width = 1178 Height = 645 Align = alClient BevelOuter = bvNone TabOrder = 0 object sprDetail: TSplitter Left = 0 Top = 435 Width = 1178 Height = 3 Cursor = crVSplit Align = alBottom end object pnlGclBills: TPanel Left = 0 Top = 0 Width = 1178 Height = 435 Align = alClient BevelOuter = bvNone TabOrder = 0 object zgGclBills: TZJGrid Left = 0 Top = 0 Width = 1178 Height = 435 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 8 RowCount = 6 FixedRowCount = 2 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 Align = alClient end end object pnlDetail: TPanel Left = 0 Top = 438 Width = 1178 Height = 207 Align = alBottom BevelOuter = bvNone TabOrder = 1 object sprRela: TSplitter Left = 638 Top = 0 Height = 207 Align = alRight end object pnlRelaData: TPanel Left = 641 Top = 0 Width = 537 Height = 207 Align = alRight BevelOuter = bvNone TabOrder = 0 object pnlRelaTop: TPanel Left = 0 Top = 0 Width = 537 Height = 21 Align = alTop BevelOuter = bvNone TabOrder = 0 object tbRelaTop: TToolBar Left = 0 Top = 0 Width = 134 Height = 21 Align = alLeft AutoSize = True ButtonHeight = 21 ButtonWidth = 67 EdgeBorders = [] Flat = True ShowCaptions = True TabOrder = 0 object tobtnDetailGL: TToolButton Left = 0 Top = 0 Caption = ' '#35843#24046#24037#26009' ' Down = True ImageIndex = 2 Style = tbsCheck end object tobtnParent: TToolButton Tag = 1 Left = 67 Top = 0 Caption = #28165#21333#29238#39033 ImageIndex = 0 Style = tbsCheck end end end object jpsRela: TJimPages Left = 0 Top = 21 Width = 537 Height = 186 ActivePage = jpsRelaDetailGL ActivePageIndex = 0 Align = alClient Caption = 'jpsRela' object jpsRelaDetailGL: TJimPage Left = 0 Top = 0 Width = 537 Height = 186 TabName = 'DetailGL' Caption = 'DetailGL' object zgDetailGL: TZJGrid Left = 0 Top = 0 Width = 537 Height = 186 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 OnMouseDown = zgDetailGLMouseDown Align = alClient end end object jpsRelaBillsParent: TJimPage Left = 0 Top = 0 Width = 537 Height = 186 TabName = 'BillsParent' Caption = 'BillsParent' end end end object pnlDetailBills: TPanel Left = 0 Top = 0 Width = 638 Height = 207 Align = alClient BevelOuter = bvNone TabOrder = 1 object labTitle: TJimGradLabel Left = 0 Top = 0 Width = 638 Height = 20 Align = alTop AutoSize = False ColorBegin = clGradientInactiveCaption ColorEnd = clGradientInactiveCaption Caption = ' '#35814#32454#28165#21333 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Layout = tlCenter end object zgDetailGclBills: TZJGrid Left = 0 Top = 20 Width = 638 Height = 187 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 13 RowCount = 6 FixedRowCount = 2 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 OnMouseDown = zgDetailGclBillsMouseDown Align = alClient end end end end object saGclBills: TsdGridDBA Columns = < item Title.Caption = #28165#21333#32534#21495 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 = 'B_Code' ReadOnly = True end item Title.Caption = #21517#31216 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 = 'Name' Width = 180 ReadOnly = True end item Title.Caption = #21333#20301 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 = taCenter Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = 'smartSimSun' Font.Style = [] FieldName = 'Units' Width = 45 ReadOnly = True end item Title.Caption = #21333#20215 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'Price' Width = 60 ReadOnly = True end item Title.Caption = #26412#26399#35745#37327#25968#37327'|'#21512#21516 Title.CaptionAcrossCols = '3' 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 = 'CurDealQuantity' Width = 65 ReadOnly = True end item Title.Caption = '|'#25968#37327#21464#26356 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 = 'CurQcQuantity' Width = 65 ReadOnly = True end item Title.Caption = '|'#23567#35745 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 = 'CurGatherQuantity' Width = 65 ReadOnly = True end> Grid = zgGclBills ExtendRowCount = 3 Options = [] Left = 112 Top = 96 end object saDetailGclBills: TsdGridDBA Columns = < item Title.Caption = #25152#23646#39033#30446#33410'|'#32534#21495 Title.CaptionAcrossCols = '3' 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 = 'XmjCode' Width = 80 ReadOnly = True 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 = 'XmjName' ReadOnly = True 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 = 'XmjUnits' Width = 45 ReadOnly = True end item Title.Caption = #37096#20301#20449#24687'|'#26729#21495 Title.CaptionAcrossCols = '5' 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 = 'Peg' Width = 80 ReadOnly = True end item Title.Caption = '|'#21333#20301#24037#31243 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 = 'NameDanWei' Width = 80 ReadOnly = True end item Title.Caption = '|'#20998#37096#24037#31243 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 = 'NameFenBu' Width = 80 ReadOnly = True end item Title.Caption = '|'#20998#39033#24037#31243 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 = 'NameFenXiang' Width = 80 ReadOnly = True end item Title.Caption = '|'#35745#37327#21333#20803 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 = 'NameUnit' Width = 80 ReadOnly = True end item Title.Caption = #26412#26399#35745#37327#25968#37327'|'#21512#21516 Title.CaptionAcrossCols = '3' 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 = 'CurDealQuantity' Width = 60 ReadOnly = True end item Title.Caption = '|'#25968#37327#21464#26356 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 = 'CurQcQuantity' Width = 60 ReadOnly = True end item Title.Caption = '|'#23567#35745 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 = 'CurGatherQuantity' Width = 60 ReadOnly = True end item Title.Caption = #26412#26399#20215#24046 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 = taRightJustify Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'PM_TotalPrice' Width = 60 ReadOnly = True end> Grid = zgDetailGclBills ExtendRowCount = 3 Options = [] Left = 96 Top = 496 end object saDetailGL: TsdGridDBA Columns = < item Title.Caption = #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 = taCenter Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] FieldName = 'Code' Width = 50 ReadOnly = True 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 = 120 ReadOnly = True 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 = 'smartSimSun' Font.Style = [] FieldName = 'Units' Width = 45 ReadOnly = True end item Title.Caption = #25968#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 = 'Quantity' Width = 60 ReadOnly = False end> Grid = zgDetailGL ExtendRowCount = 3 Options = [aoAllowEdit, aoAllowDelete, aoAutoInsert] Left = 728 Top = 504 end object dxpmDetailGL: TdxBarPopupMenu BarManager = MainForm.dxBarManager ItemLinks = < item Item = MainForm.dxbtnAddDetailGLs Visible = True end item Item = MainForm.dxbtnDelete Visible = True end> UseOwnFont = False OnPopup = dxpmDetailGLPopup Left = 768 Top = 504 end object actnPriceMarginBills: TActionList Images = MainForm.Images Left = 160 Top = 96 object actnAddDetailGLs: TAction Caption = #26032#22686#35843#24046#24037#26009 ImageIndex = 2 OnExecute = actnAddDetailGLsExecute OnUpdate = actnAddDetailGLsUpdate end object actnCopyDetailGLs: TAction Caption = #22797#21046#35843#24046#24037#26009 ImageIndex = 4 end object actnApplyToSameBills: TAction Caption = #24212#29992#35843#24046#24037#26009#33267#30456#21516#28165#21333 OnExecute = actnApplyToSameBillsExecute OnUpdate = actnAddDetailGLsUpdate end end object dxpmDetailGclBills: TdxBarPopupMenu BarManager = MainForm.dxBarManager ItemLinks = < item Item = MainForm.dxbtnApplyToSameBills Visible = True end item BeginGroup = True Item = MainForm.dxbtnCopyDetailGls Visible = True end item Item = MainForm.dxbtnPaste Visible = True end> UseOwnFont = False OnPopup = dxpmDetailGclBillsPopup Left = 136 Top = 496 end object xpm: TXPMenu DimLevel = 30 GrayLevel = 10 Font.Charset = DEFAULT_CHARSET Font.Color = clMenuText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Color = clBtnFace IconBackColor = clBtnFace MenuBarColor = clBtnFace SelectColor = 38640 SelectBorderColor = clHighlight SelectFontColor = clMenuText DisabledColor = clInactiveCaption SeparatorColor = clBtnFace CheckedColor = clHighlight IconWidth = 24 DrawSelect = True UseSystemColors = False OverrideOwnerDraw = False Gradient = False FlatMenu = False AutoDetect = True XPControls = [xcToolbar] Active = True ControlUseTrueXPStyle = True BtnRoundArc = 5 BtnOutLineBorderColor = 7552000 BtnInnerBorderMoveColor = 3257087 BtnInnerBorderFocusColor = 15183500 BtnSurfaceNormalColor = 16251903 BtnSurfaceDownColor = 14608359 BtnSurfaceBottomLineColor = 14608359 BtnSurfaceDownBottomLineColor = 15199215 RdoChkControlChkColor = 41472 ComboBoxChkColor = 9201994 ComboboxSurfaceMoveColor = 16771030 ControlDisabledBorderColor = 11913158 Left = 207 Top = 96 end end