object DealBillsForm: TDealBillsForm Left = 359 Top = 221 Width = 586 Height = 563 Caption = #20462#25913#31614#32422#28165#21333 Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 12 object pnlTitle: TPanel Left = 0 Top = 0 Width = 578 Height = 21 Align = alTop BevelOuter = bvNone TabOrder = 0 object lblTitle: TLabel Left = 6 Top = 5 Width = 48 Height = 12 Caption = #31614#32422#28165#21333 Font.Charset = ANSI_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object pnlBar: TPanel Left = 58 Top = 10 Width = 515 Height = 2 BevelOuter = bvLowered TabOrder = 0 end end object pnlDealBills: TPanel Left = 0 Top = 21 Width = 578 Height = 508 Align = alClient BevelOuter = bvNone TabOrder = 1 object zgDealBills: TZJGrid Left = 0 Top = 0 Width = 578 Height = 508 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 Align = alClient 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 = 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 = 150 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 = 45 ReadOnly = False 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 = False 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 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 = False end> Grid = zgDealBills ExtendRowCount = 3 Options = [aoAllowInsert, aoAllowEdit, aoAutoInsert] Left = 192 Top = 205 end end