object DealBillsFrame: TDealBillsFrame Left = 0 Top = 0 Width = 479 Height = 362 TabOrder = 0 object pnlDealBills: TPanel Left = 0 Top = 21 Width = 479 Height = 341 Align = alClient BevelOuter = bvNone TabOrder = 0 object zgDealBills: TZJGrid Left = 0 Top = 0 Width = 479 Height = 341 Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection] OptionsEx = [] ColCount = 7 RowCount = 4 ShowGridLine = False DefaultColWidth = 73 DefaultFixedColWidth = 25 Selection.AlphaBlend = False Selection.TransparentColor = False FrozenCol = 0 FrozenRow = 0 OnMouseDown = zgDealBillsMouseDown Align = alClient end end object pnlTop: TPanel Left = 0 Top = 0 Width = 479 Height = 21 Align = alTop BevelOuter = bvNone TabOrder = 1 object labTitle: TJimGradLabel Left = 0 Top = 0 Width = 479 Height = 21 Align = alClient AutoSize = False ColorBegin = clGradientInactiveCaption ColorEnd = clGradientInactiveCaption Caption = ' '#31614#32422#28165#21333' -- '#38405#35835#27169#24335 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Layout = tlCenter end end object saDealBills: TsdGridDBA Columns = < 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 = 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 = 150 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 = #21333#20215 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 = 'Price' Width = 60 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 = True end item Title.Caption = #37329#39069 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 = 'TotalPrice' Width = 60 ReadOnly = True end> Grid = zgDealBills ExtendRowCount = 3 Options = [aoAllowInsert, aoAllowEdit, aoAutoInsert] Left = 192 Top = 205 end object dxpmDealBills: TdxBarPopupMenu BarManager = MainForm.dxBarManager ItemLinks = < item Item = MainForm.dxbtnChangeDealBillsMode Visible = True end> UseOwnFont = False OnPopup = dxpmDealBillsPopup Left = 112 Top = 112 end object alDealBills: TActionList Left = 160 Top = 112 object actnChangeDealBillsMode: TAction Caption = #20999#25442#33267 OnExecute = actnChangeDealBillsModeExecute end end end