infosch.dfm

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

object InfoSchForm: TInfoSchForm
  Left = 113
  Top = 169
  Width = 700
  Height = 460
  Caption = #20849#29992#26597#35810
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Tbinfo: TToolBar
    Left = 0
    Top = 0
    Width = 692
    Height = 39
    ButtonHeight = 35
    ButtonWidth = 55
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    Images = ILinfo
    ParentFont = False
    ShowCaptions = True
    TabOrder = 0
    object ToolButton4: TToolButton
      Left = 0
      Top = 0
      Width = 8
      Caption = 'ToolButton4'
      ImageIndex = 0
      Style = tbsSeparator
    end
    object TBsec: TToolButton
      Left = 8
      Top = 0
      Caption = #26597#25214
      ImageIndex = 0
      OnClick = TBsecClick
    end
    object Tbprint: TToolButton
      Left = 63
      Top = 0
      Caption = '  '#25171#21360'  '
      DropdownMenu = PMprint
      ImageIndex = 1
      Style = tbsDropDown
    end
    object Tbsave: TToolButton
      Left = 131
      Top = 0
      Caption = #23548#20986
      ImageIndex = 2
      OnClick = TbsaveClick
    end
    object ToolButton7: TToolButton
      Left = 186
      Top = 0
      Width = 8
      Caption = 'ToolButton7'
      ImageIndex = 1
      Style = tbsSeparator
    end
    object tbSetColumn: TToolButton
      Left = 194
      Top = 0
      Caption = #35774#32622#21015
      ImageIndex = 5
      OnClick = tbSetColumnClick
    end
    object tbSaveColumn: TToolButton
      Left = 249
      Top = 0
      Caption = #20445#23384#30028#38754
      ImageIndex = 4
      OnClick = tbSaveColumnClick
    end
    object ToolButton3: TToolButton
      Left = 304
      Top = 0
      Width = 8
      Caption = 'ToolButton3'
      ImageIndex = 4
      Style = tbsSeparator
    end
    object Tbexit: TToolButton
      Left = 312
      Top = 0
      Caption = #36864#20986
      ImageIndex = 3
      OnClick = TbexitClick
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 124
    Width = 692
    Height = 309
    Align = alClient
    TabOrder = 3
    object Splitter1: TSplitter
      Left = 345
      Top = 1
      Width = 5
      Height = 307
      Cursor = crHSplit
      Align = alRight
    end
    object DBGrid1: TDBGridEh
      Left = 1
      Top = 1
      Width = 344
      Height = 307
      Align = alClient
      DataSource = DataE2.dsRpt
      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 = -13
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      FooterRowCount = 1
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghAutoSortMarking, dghDialogFind]
      ParentFont = False
      SortLocal = True
      SumList.Active = True
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWhite
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      UseMultiTitle = True
      VertScrollBar.VisibleMode = sbAlwaysShowEh
    end
    object grdGoods: TDBGridEh
      Left = 350
      Top = 1
      Width = 341
      Height = 307
      Align = alRight
      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, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      VertScrollBar.VisibleMode = sbAlwaysShowEh
      Columns = <
        item
          EditButtons = <>
          FieldName = 'code'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #36135#21697#32534#30721
          Width = 60
        end
        item
          EditButtons = <>
          FieldName = 'name'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #36135#21697#21517#31216
          Width = 135
        end
        item
          EditButtons = <>
          FieldName = 'units'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #21333#20301
          Width = 32
        end
        item
          EditButtons = <>
          FieldName = 'qty'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #25968#37327
          Width = 40
        end
        item
          EditButtons = <>
          FieldName = 'price'
          Font.Charset = GB2312_CHARSET
          Font.Color = clRed
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #21333#20215
          Title.Font.Charset = GB2312_CHARSET
          Title.Font.Color = clBlack
          Title.Font.Height = -12
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 50
        end>
    end
  end
  object PanelCondition1: TPanel
    Left = 0
    Top = 39
    Width = 692
    Height = 39
    Align = alTop
    Alignment = taLeftJustify
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
  end
  object PanelCondition2: TPanel
    Left = 0
    Top = 78
    Width = 692
    Height = 46
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    Visible = False
    object Label1: TLabel
      Left = 16
      Top = 18
      Width = 24
      Height = 12
      Caption = #26085#26399
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 136
      Top = 18
      Width = 12
      Height = 12
      Caption = #21040
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 253
      Top = 18
      Width = 24
      Height = 12
      Caption = #21345#21495
      Font.Charset = GB2312_CHARSET