| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262 | object tpPegGclGatherFrame: TtpPegGclGatherFrame  Left = 0  Top = 0  Width = 685  Height = 513  TabOrder = 0  object sprPeg_Gcl: TSplitter    Left = 0    Top = 310    Width = 685    Height = 3    Cursor = crVSplit    Align = alBottom  end  object zgGclGather: TZJGrid    Left = 0    Top = 0    Width = 685    Height = 310    Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]    OptionsEx = []    ColCount = 7    ShowGridLine = False    DefaultColWidth = 73    DefaultFixedColWidth = 25    Selection.AlphaBlend = False    Selection.TransparentColor = False    FrozenCol = 0    FrozenRow = 0    Align = alClient  end  object zgGclRela: TZJGrid    Left = 0    Top = 313    Width = 685    Height = 200    Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]    OptionsEx = []    ColCount = 6    ShowGridLine = False    DefaultColWidth = 73    DefaultFixedColWidth = 25    Selection.AlphaBlend = False    Selection.TransparentColor = False    FrozenCol = 0    FrozenRow = 0    Align = alBottom  end  object saGclGather: 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'        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 = 200        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 = '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 = 80        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 = 80        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 = 80        ReadOnly = True      end>    Grid = zgGclGather    ExtendRowCount = 0    Options = []    Left = 120    Top = 88  end  object saGclRela: TsdGridDBA    Columns = <      item        Title.Caption = #39033#30446#33410#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 = 'PegXmjCode'        Width = 120        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 = 'PegXmjName'        Width = 200        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 = 'PegXmjUnits'        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 = 80        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 = 80        ReadOnly = True      end>    Grid = zgGclRela    ExtendRowCount = 0    Options = []    Left = 120    Top = 360  endend
 |