ugroup.dfm

这是一个三层的进销存系统

inherited frmgroup: Tfrmgroup
  Left = 291
  Top = 479
  Height = 378
  Caption = #32676#32452#36164#26009
  PixelsPerInch = 96
  TextHeight = 12
  inherited CoolBar1: TCoolBar
    Top = 317
  end
  inherited Grid: TDBGridEh
    Height = 317
    Columns = <
      item
        EditButtons = <>
        FieldName = 'fid'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #24207#21495
      end
      item
        EditButtons = <>
        FieldName = 'fcode'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #29992#25143#32676#32452#20195#30721
      end
      item
        EditButtons = <>
        FieldName = 'fname'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21517#31216
      end
      item
        EditButtons = <>
        FieldName = 'fnote'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #22791#27880
      end>
  end
  inherited CDSbaseinfo: TClientDataSet
    object CDSbaseinfofid: TAutoIncField
      FieldName = 'fid'
      ReadOnly = True
    end
    object CDSbaseinfofcode: TWideStringField
      FieldName = 'fcode'
      Size = 12
    end
    object CDSbaseinfofname: TWideStringField
      FieldName = 'fname'
    end
    object CDSbaseinfofnote: TWideStringField
      FieldName = 'fnote'
      Size = 30
    end
  end
  inherited frBaseinfo: TfrReport
    ReportForm = {19000000}
  end
end