fei_liu.dfm

采购管理系统：delphi+sql实现了企业采购自动化作业流程

        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00}
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton
      Left = 379
      Top = 104
      Width = 41
      Height = 25
      Hint = #20462#25913
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333393333
        333333333337F3333333333333397333333333333337FF333333333333C94333
        3333333333737F333333333333C9473333333333337373F3333333333CC94433
        3333333337F7F7F3333333333CC94473333333333737F73F33333333CCC94443
        333333337F37F37F33333333CCC94447333333337337F373F333333CCCC94444
        33333337F337F337F333333CCCC94444733333373337F3373F3333CCCCC94444
        4333337F3337FF337F3333CCCCC94444473333733F7773FF73F33CCCCC393444
        443337F37737F773F7F33CCC33393374447337F73337F33737FFCCC333393333
        444377733337F333777FC3333339333337437333333733333373}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton
      Left = 427
      Top = 104
      Width = 41
      Height = 25
      Hint = #36820#22238
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333FF3333333333333003333333333333F77F33333333333009033
        333333333F7737F333333333009990333333333F773337FFFFFF330099999000
        00003F773333377777770099999999999990773FF33333FFFFF7330099999000
        000033773FF33777777733330099903333333333773FF7F33333333333009033
        33333333337737F3333333333333003333333333333377333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton3Click
    end
    object DBComboBox1: TDBComboBox
      Left = 21
      Top = 40
      Width = 100
      Height = 21
      DataField = 'bi_bue_name'
      DataSource = DataSource1
      ItemHeight = 13
      TabOrder = 0
      OnKeyPress = DBComboBox1KeyPress
    end
    object DBEdit2: TDBEdit
      Left = 136
      Top = 40
      Width = 81
      Height = 21
      Color = cl3DLight
      DataField = 'bi_bue_no'
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 1
    end
    object DBNavigator1: TDBNavigator
      Left = 35
      Top = 104
      Width = 288
      Height = 25
      DataSource = DataSource1
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbDelete, nbPost, nbCancel, nbRefresh]
      Flat = True
      TabOrder = 2
    end
    object Edit1: TEdit
      Left = 240
      Top = 40
      Width = 97
      Height = 21
      TabOrder = 3
      Text = 'Edit1'
      OnKeyPress = Edit1KeyPress
    end
  end
  object Edit2: TEdit
    Left = 363
    Top = 57
    Width = 100
    Height = 21
    Color = cl3DLight
    ReadOnly = True
    TabOrder = 0
    Text = 'Edit2'
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 176
    Width = 553
    Height = 161
    Anchors = [akLeft, akTop, akRight, akBottom]
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'bi_bue_no'
        Title.Caption = #24163#21029#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bi_bue_name'
        Title.Caption = #24163#21029#21517
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bi_bue_fei'
        Title.Caption = #21295#29575
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'taio_ren'
        Title.Caption = #35519#25972#20154
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'tiao_date'
        Title.Caption = #35519#25972#26085#26399
        Visible = True
      end>
  end
  object Table1: TTable
    Active = True
    AfterScroll = Table1AfterScroll
    DatabaseName = 'vvv'
    IndexFieldNames = 'bi_bue_name'
    TableName = 'dbo.fei_liu_tiao'
    Left = 248
    Top = 224
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 320
    Top = 232
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'vvv'
    IndexFieldNames = 'bi_bue_no'
    TableName = 'dbo.bi_bue_kind'
    Left = 120
    Top = 224
  end
end