| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187 | 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  endend
 |