iogas.dfm

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

inherited IOGasForm: TIOGasForm
  Left = 166
  Top = 152
  Width = 640
  Caption = 'IOGasForm'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited mbPanel1: TPanel
    Width = 632
    inherited mbPanel2: TPanel
      Width = 632
      inherited lblBillDate: TLabel
        Left = 426
      end
      inherited lblInvoNo: TLabel
        Left = 516
      end
      inherited lblFormName: TLabel
        Width = 60
        Caption = #25552#36135#21333
      end
      inherited lblStore: TLabel
        Left = 191
        Top = 47
      end
      inherited lblEmp: TLabel
        Left = 455
        Caption = #21457#36135#20154
      end
      inherited lblOther: TLabel
        Left = 543
        Caption = #24320#31080#20154
      end
      object Label1: TLabel [6]
        Left = 5
        Top = 46
        Width = 83
        Height = 35
        Alignment = taCenter
        Anchors = [akTop, akRight]
        AutoSize = False
        Caption = #25552#36135#20154
        Color = clBackground
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label2: TLabel [7]
        Left = 367
        Top = 47
        Width = 83
        Height = 34
        Alignment = taCenter
        Anchors = [akTop, akRight]
        AutoSize = False
        Caption = #25910#29942#20154
        Color = clBackground
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label3: TLabel [8]
        Left = 278
        Top = 47
        Width = 83
        Height = 34
        Alignment = taCenter
        Anchors = [akTop, akRight]
        AutoSize = False
        Caption = #28857#29942#20154
        Color = clBackground
        Font.Charset = ANSI_CHARSET
        Font.Color = clWhite
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      inherited edtBillDate: TDateTimePicker
        Left = 426
      end
      inherited edtInvoNo: TEdit
        Left = 517
      end
      inherited edtEmp: TfrComboEdit
        Left = 542
      end
      inherited edtStore: TfrComboEdit
        Left = 190
        Top = 60
      end
      object empTrans: TfrComboEdit
        Left = 455
        Top = 60
        Width = 85
        Height = 21
        Style = csSimple
        Anchors = [akTop, akRight]
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 4
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFF8888888888FFFFFF8888444888FFFFFF8888444888FFFFFF888888888
          8FFFFFF8888447888FFFFFF8888447888FFFFFF8888844888FFFFFF888888447
          8FFFFFF8744887447FFFFFF8447888444FFFFFF8447888444FFFFFF884488744
          7FFFFFF8884444478FFFFFF8888888888FFFFFFFFFFFFFFFFFFF}
        OnButtonClick = edtEmpButtonClick
      end
      object empRec: TfrComboEdit
        Left = 367
        Top = 60
        Width = 85
        Height = 21
        Style = csSimple
        Anchors = [akTop, akRight]
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 5
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFF8888888888FFFFFF8888444888FFFFFF8888444888FFFFFF888888888
          8FFFFFF8888447888FFFFFF8888447888FFFFFF8888844888FFFFFF888888447
          8FFFFFF8744887447FFFFFF8447888444FFFFFF8447888444FFFFFF884488744
          7FFFFFF8884444478FFFFFF8888888888FFFFFFFFFFFFFFFFFFF}
        OnButtonClick = edtEmpButtonClick
      end
      object empCount: TfrComboEdit
        Left = 278
        Top = 60
        Width = 85
        Height = 21
        Style = csSimple
        Anchors = [akTop, akRight]
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 6
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          0400000000008000000000000000000000001000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
          FFFFFFF8888888888FFFFFF8888444888FFFFFF8888444888FFFFFF888888888
          8FFFFFF8888447888FFFFFF8888447888FFFFFF8888844888FFFFFF888888447
          8FFFFFF8744887447FFFFFF8447888444FFFFFF8447888444FFFFFF884488744
          7FFFFFF8884444478FFFFFF8888888888FFFFFFFFFFFFFFFFFFF}
        OnButtonClick = edtEmpButtonClick
      end
      object empClientOpr: TEdit
        Left = 5
        Top = 59
        Width = 81
        Height = 21
        TabOrder = 7
      end
    end
    inherited mbPanel3: TPanel
      Width = 632
      inherited DBGrid1: TDBGridEh
        Width = 542
        UseMultiTitle = True
        Columns = <
          item
            AutoDropDown = True
            EditButtons = <>
            FieldName = 'code'
            Footers = <
              item
                Alignment = taCenter
                Value = #21512#35745#65306
                ValueType = fvtStaticText
              end>
            Title.Caption = #32534#30721
            Width = 50
          end
          item
            AutoFitColWidth = False
            EditButtons = <>
            FieldName = 'name'
            Footers = <>
            ReadOnly = True
            Title.Caption = #21697#21517
            Width = 37
          end
          item
            EditButtons = <>
            FieldName = 'perqty'
            Footers = <>
            ReadOnly = True
            Width = 0
          end
          item
            Alignment = taCenter
            AutoFitColWidth = False
            EditButtons = <>
            FieldName = 'units'
            Footers = <>
            Title.Caption = #21333#20301
            Width = 46
          end
          item
            EditButtons = <>
            FieldName = 'QtySelf'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#33258' '#29942
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyTest'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#35797' '#21387
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyChgValve'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#25442' '#38400
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyChgKey'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#25442' '#21273
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyBads'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#22351' '#29942
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyPaint'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#27833' '#28422
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyClean'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#27927' '#29942
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyVacuum'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #25910'      '#29942'      '#25968'|'#25277' '#30495' '#31354
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtySelfOut'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #23454'  '#21457'  '#25968'| '#33258'        '#29942
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'Qty'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #23454'  '#21457'  '#25968'|'#28385' '#29942
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'QtyBadsOut'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #23454'  '#21457'  '#25968'|'#22351' '#29942
            Width = 30
          end
          item
            EditButtons = <>
            FieldName = 'PRICE'
            Font.Charset = GB2312_CHARSET
            Font.Color = clRed
            Font.Height = -15
            Font.Name = #23435#20307
            Font.Style = []
            Footers = <>
            Title.Caption = #21333#20215
            Width = 40
          end
          item
            EditButtons = <>
            FieldName = 'total'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #37329#39069
            Width = 45
          end
          item
            EditButtons = <>
            FieldName = 'memo1'
            Footers = <>
            Title.Caption = #22791#27880
          end>
      end
      inherited DBComboBoxEh1: TDBComboBoxEh
        Left = 234
        Top = 95
      end
    end
    inherited mbPanel4: TPanel
      Width = 632
      inherited lblMemo: TLabel
        Width = 72
        Caption = #36710#21495#21450#22791#27880#65306
      end
      inherited lblName: TLabel
        Caption = #23458'  '#25143#65306
      end
      inherited stQty: TStaticText [2]
        Left = 512
        Top = 9
        Width = 90
        Height = 13
        Visible = False
      end
      inherited stinprice: TStaticText [3]
        Left = 436
        Top = 6
        Width = 39
        Height = 15
        Visible = False
      end
      inherited edtName: TfrComboEdit [4]
      end
      inherited edtMemo: TEdit [5]
        Left = 272
        Width = 345
      end
    end
  end
  inherited ToolBar1: TToolBar
    Width = 632
    inherited ToolButton2: TToolButton
      Visible = False
    end
  end
end