infotype.dfm

飞恒进销存(超市批发)管理系统V5.1（含源程序） 语言：Delphi 6/7 相关控件：FastReport 2.4以上, Ehlib 3.4以上 1.数据库为fhe2db_V51.da

inherited infoTypeForm: TinfoTypeForm
  Left = 206
  Top = 137
  Width = 607
  Caption = #29289#21697#31867#21035
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter2: TSplitter [0]
    Left = 403
    Top = 78
    Width = 5
    Height = 318
    Cursor = crHSplit
    Align = alRight
  end
  object Splitter1: TSplitter [1]
    Left = 174
    Top = 78
    Width = 5
    Height = 318
    Cursor = crHSplit
  end
  inherited infoGEh: TDBGridEh
    Width = 174
    Align = alLeft
    DataSource = DataE2.dsType
    Columns = <
      item
        EditButtons = <>
        FieldName = 'type'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #19968#31867
      end
      item
        EditButtons = <>
        FieldName = 'name'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21517' '#31216
      end>
  end
  inherited Tbinfo: TToolBar
    Width = 599
    inherited tbCopy: TToolButton
      Visible = False
    end
    inherited TBsec: TToolButton
      Visible = False
    end
  end
  object DBGrid2: TDBGridEh [4]
    Left = 408
    Top = 78
    Width = 191
    Height = 318
    Align = alRight
    DataSource = DataE2.dsType2
    FixedColor = 9090758
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    SumList.Active = True
    TabOrder = 4
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWhite
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDblClick = infoGEhDblClick
    Columns = <
      item
        EditButtons = <>
        FieldName = 'code2'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #19977#31867
        Width = 59
      end
      item
        EditButtons = <>
        FieldName = 'name'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21517' '#31216
        Width = 104
      end>
  end
  object DBGrid1: TDBGridEh [5]
    Left = 179
    Top = 78
    Width = 224
    Height = 318
    Align = alClient
    DataSource = DataE2.dsType1
    FixedColor = 9090758
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    FooterColor = clWindow
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -12
    FooterFont.Name = #23435#20307
    FooterFont.Style = []
    Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
    ParentFont = False
    SumList.Active = True
    TabOrder = 3
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWhite
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDblClick = infoGEhDblClick
    Columns = <
      item
        EditButtons = <>
        FieldName = 'code1'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #20108#31867
        Width = 59
      end
      item
        EditButtons = <>
        FieldName = 'name'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #21517' '#31216
        Width = 138
      end>
  end
  inherited PanelCondition1: TPanel
    Width = 599
    Visible = False
  end
end