Measure/Frames/DealBillsFme.dfm

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