upgrade.dfm.svn-base

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

object UpgradeForm: TUpgradeForm
  Left = 192
  Top = 107
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #25968#25454#24211#21319#32423
  ClientHeight = 216
  ClientWidth = 425
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object pnlStep2: TPanel
    Left = 8
    Top = 8
    Width = 409
    Height = 169
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object lblProcess1: TLabel
      Left = 32
      Top = 40
      Width = 345
      Height = 12
      AutoSize = False
      Caption = #35814#32454#36827#24230
    end
    object lblProcess2: TLabel
      Left = 32
      Top = 88
      Width = 345
      Height = 12
      AutoSize = False
      Caption = #24635#30340#36827#24230
    end
    object ProgressBar1: TProgressBar
      Left = 32
      Top = 56
      Width = 345
      Height = 17
      Min = 0
      Max = 100
      TabOrder = 0
    end
    object ProgressBar2: TProgressBar
      Left = 32
      Top = 104
      Width = 345
      Height = 16
      Min = 0
      Max = 100
      TabOrder = 1
    end
  end
  object pnlStep1: TPanel
    Left = 8
    Top = 8
    Width = 409
    Height = 169
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object lblSystem: TLabel
      Left = 24
      Top = 16
      Width = 84
      Height = 12
      Caption = #31995#32479#25968#25454#24211#25991#20214
    end
    object lblDatabase: TLabel
      Left = 24
      Top = 64
      Width = 84
      Height = 12
      Caption = #25968#25454#24211#35774#35745#25991#20214
    end
    object sbSystem: TSpeedButton
      Left = 362
      Top = 32
      Width = 23
      Height = 22
      Flat = True
      Glyph.Data = {
        62030000424D6203000000000000420000002800000014000000140000000100
        1000030000002003000000000000000000000000000000000000007C0000E003
        00001F000000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7FFF7FFF7FFF7F000000000000
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F000018630000FF7FFF7FFF7FFF7F
        FF7F000018630000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000
        1042FF7FFF7FFF7F1042000000000000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7F00000000000000000000000000000000000000000000FF7FFF7FFF7FFF7F
        FF7F170017001700170000001863000000000000000018630000000000000000
        FF7FFF7FFF7FFF7FFF7F1700FF7FFF7FFF7F0000186300000000000000001863
        0000000000000000FF7FFF7FFF7FFF7FFF7F1700FF7F10421042000000000000
        00000000000000000000000000000000FF7FFF7FFF7FFF7FFF7F1700FF7FFF7F
        FF7FFF7F000000000000000018630000000000000000FF7FFF7FFF7FFF7FFF7F
        FF7F1700FF7F10421042FF7F10420000000010421042FF7F00000000FF7FFF7F
        FF7FFF7FFF7FFF7FFF7F1700FF7FFF7FFF7FFF7FFF7F00000000FF7FFF7FFF7F
        00000000FF7FFF7FFF7FFF7FFF7FFF7FFF7F1700FF7F10421042FF7F10420000
        000010421042FF7F00000000FF7FFF7FFF7FFF7FFF7FFF7FFF7F1700FF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1700FF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7F170017001700170017001700170017001700170017001700FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7F17001863170017001863170017001863170017001863
        1700FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1700170017001700170017001700
        17001700170017001700FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7F}
      OnClick = sbSystemClick
    end
    object sbDatabase: TSpeedButton
      Left = 362
      Top = 80
      Width = 23
      Height = 22
      Flat = True
      Glyph.Data = {
        62030000424D6203000000000000420000002800000014000000140000000100
        1000030000002003000000000000000000000000000000000000007C0000E003
        00001F000000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7FFF7FFF7FFF7F000000000000
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F000018630000FF7FFF7FFF7FFF7F
        FF7F000018630000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000
        1042FF7FFF7FFF7F1042000000000000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7F00000000000000000000000000000000000000000000FF7FFF7FFF7FFF7F
        FF7F170017001700170000001863000000000000000018630000000000000000
        FF7FFF7FFF7FFF7FFF7F1700FF7FFF7FFF7F0000186300000000000000001863
        0000000000000000FF7FFF7FFF7FFF7FFF7F1700FF7F10421042000000000000
        00000000000000000000000000000000FF7FFF7FFF7FFF7FFF7F1700FF7FFF7F
        FF7FFF7F000000000000000018630000000000000000FF7FFF7FFF7FFF7FFF7F
        FF7F1700FF7F10421042FF7F10420000000010421042FF7F00000000FF7FFF7F
        FF7FFF7FFF7FFF7FFF7F1700FF7FFF7FFF7FFF7FFF7F00000000FF7FFF7FFF7F
        00000000FF7FFF7FFF7FFF7FFF7FFF7FFF7F1700FF7F10421042FF7F10420000
        000010421042FF7F00000000FF7FFF7FFF7FFF7FFF7FFF7FFF7F1700FF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1700FF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7F170017001700170017001700170017001700170017001700FF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7F17001863170017001863170017001863170017001863
        1700FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F1700170017001700170017001700
        17001700170017001700FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
        FF7FFF7FFF7F}
      OnClick = sbDatabaseClick
    end
    object sbBackup: TSpeedButton
      Left = 362
      Top = 128
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        4E010000424D4E01000000000000760000002800000012000000120000000100
        040000000000D800000000000000000000001000000010000000000000000000
        BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333330000003333333333333333330000003333333333333333330000003800
        000000000003330000003007B7B7B7B7B7B03300000030F07B7B7B7B7B703300
        000030B0B7B7B7B7B7B70300000030FB0B7B7B7B7B7B0300000030BF07B7B7B7
        B7B7B000000030FBF000007B7B7B7000000030BFBFBFBF0000000300000030FB
        FBFBFBFBFB033300000030BFBFBFBFBFBF033300000030FBFBF0000000333300
        0000330000033333333333000000333333333333333333000000333333333333
        333333000000333333333333333333000000}
      OnClick = sbBackupClick
    end
    object edtSystem: TEdit
      Left = 24
      Top = 32
      Width = 337
      Height = 20
      TabOrder = 0
    end
    object edtDatabase: TEdit
      Left = 24
      Top = 80
      Width = 337
      Height = 20
      TabOrder = 1
    end
    object cbBackup: TCheckBox
      Left = 24
      Top = 112
      Width = 145
      Height = 17
      Caption = #21319#32423#21069#22791#20221#26087#30340#25991#20214
      TabOrder = 2
      OnClick = cbBackupClick
    end
    object edtBackup: TEdit
      Left = 24
      Top = 128
      Width = 337
      Height = 20
      Color = clBtnFace
      Enabled = False
      TabOrder = 3
    end
  end
  object bbtnOk: TBitBtn
    Left = 248
    Top = 184
    Width = 75
    Height = 25
    Caption = #30830#23450'(&O)'
    Default = True
    TabOrder = 2
    OnClick = bbtnOkClick
  end
  object bbtnExit: TBitBtn
    Left = 328
    Top = 184
    Width = 75
    Height = 25
    Caption = #36864#20986'(&X)'
    TabOrder = 3
    OnClick = bbtnExitClick
  end
  object OpenDialog1: TOpenDialog
    Left = 24
    Top = 184
  end
  object DDMADOC: TADOConnection
    LoginPrompt = False
    Left = 192
    Top = 88
  end
  object qryDDM: TADOQuery
    Connection = DDMADOC
    Parameters = <>
    Left = 224
    Top = 88
  end
  object qryDatabase: TADOQuery
    Connection = SYSADOC
    Parameters = <>
    SQL.Strings = (
      'select * from HwDatabase')
    Left = 152
    Top = 184
  end
  object qryQuery: TADOQuery
    Connection = ACCTADOC
    Parameters = <>
    Left = 224
    Top = 136
  end
  object SYSADOC: TADOConnection
    ConnectionString = 
      'Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initi' +
      'al Catalog=HwERP5;Data Source=.'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 112
    Top = 184
  end
  object adsDatabase: TADODataSet
    Connection = SYSADOC
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    FieldDefs = <
      item
        Name = 'FName'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'FCompany'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'FDate'
        Attributes = [faFixed]
        DataType = ftDateTime
      end
      item
        Name = 'FPath'
        DataType = ftString
        Size = 255
      end
      item
        Name = 'FType'
        Attributes = [faFixed]
        DataType = ftSmallint
      end
      item
        Name = 'FHost'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'FUser'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'FPass'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'FVersion'
        DataType = ftString
        Size = 255
      end>
    Parameters = <>
    StoreDefs = True
    Left = 72
    Top = 184
  end
  object ACCTADOC: TADOConnection
    LoginPrompt = False
    Left = 192
    Top = 136
  end
end