main.~dfm

档案管理系统,档案管理系统vb+access源代码+可执行文件+论文+开题报告+外文翻译..

object MainFrm: TMainFrm
  Left = 201
  Top = 122
  Width = 544
  Height = 376
  Caption = #20154#20107#26723#26696#31649#29702#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020040000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000000000000000000000000
    000000008000008000000080800080000000800080008080000080808000C0C0
    C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000008000000000000000000
    00000000000CC88800000000000000000000000000CCC8888800000000000000
    0000000000CCC888888000000000000000000000C0CCC8888888800000000000
    0000000CC0CCC8888888888000000000000000CCCCCCC4888888888880000000
    000000CCCCCCCF4448888888888000000000C0CCCCCCFCCCCC48888888880000
    000CC0CCCCCFCCCCCCCC488888800000000CCCCCCCFCCCCCCCCCC44888800000
    0C0CCCCCCFCCCCCBBBCCCCC448800000CC0CCCCCFCCCCCBBCBCCCCCCCC48000C
    CCCCCCCFCCCCCCBBCBCCCCCCCCCC000CCCCCCCFCCCCCCCCBCBCBBBCCCCCC0C0C
    CCCCCFCCCCCCCCCCBBBBCBCCCCC0CC0CCCCCFCCCCCCCCCCBBCBCCBCCCC00CC4C
    CCCFCCCCCCCCCBBBCCBBBBCCC000CC4CCCFCCCCCBBBBBBCCCCCCCCCC0000CCCC
    CFCCCCCCBCCCCCCCCCCCCCC00000CCCCFCCCCCBBBBBCCCCCCCCCCC0000000CCF
    CCCCBBBCBBBCCCCCCCCCC0000000000CCCCCBBBCBBBCCCCCCCCC000000000000
    0CCCCCCCCCCCCCCCCCC00000000000000000CCCCCCCCCCCCCC00000000000000
    000000CCCCCCCCCCC000000000000000000000000CCCCCCC0000000000000000
    000000000000CCC000000000000000000000000000000000000000000000FFFF
    FFFFFFFFFFFFFFFC3FFFFFF80FFFFFF003FFFFE001FFFFC0007FFF80001FFF00
    0007FE000001FC000000F8000000F0000001E0000001C0000001800000000000
    0000000000000000000100000003000000070000000F0000001F0000003F8000
    007FE00000FFF80001FFFF0003FFFFC007FFFFF80FFFFFFF1FFFFFFFFFFF}
  Menu = MainMenu1
  OldCreateOrder = False
  PopupMenu = PopupMenu1
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 41
    Width = 536
    Height = 289
    Align = alClient
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 536
    Height = 41
    ButtonHeight = 36
    ButtonWidth = 55
    Caption = 'ToolBar1'
    Images = ImageList1
    ShowCaptions = True
    TabOrder = 0
    object ToolButton1: TToolButton
      Left = 0
      Top = 2
      Caption = #26723#26696#32534#36753
      ImageIndex = 2
      OnClick = ToolButton1Click
    end
    object ToolButton2: TToolButton
      Left = 55
      Top = 2
      Caption = #26723#26696#26597#35810
      ImageIndex = 1
      OnClick = ToolButton2Click
    end
    object ToolButton3: TToolButton
      Left = 110
      Top = 2
      Caption = #26723#26696#35843#21160
      ImageIndex = 4
      OnClick = ToolButton3Click
    end
    object ToolButton7: TToolButton
      Left = 165
      Top = 2
      Width = 8
      Caption = 'ToolButton7'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object ToolButton4: TToolButton
      Left = 173
      Top = 2
      Caption = #20449#24687#31649#29702
      DropdownMenu = PopupMenu2
      ImageIndex = 3
      Style = tbsDropDown
    end
    object ToolButton8: TToolButton
      Left = 241
      Top = 2
      Width = 8
      Caption = 'ToolButton8'
      ImageIndex = 6
      Style = tbsSeparator
    end
    object ToolButton5: TToolButton
      Left = 249
      Top = 2
      Caption = #25171#21360#35774#32622
      ImageIndex = 5
      OnClick = ToolButton5Click
    end
    object ToolButton9: TToolButton
      Left = 304
      Top = 2
      Caption = #36864#20986
      ImageIndex = 0
      OnClick = ToolButton9Click
    end
  end
  object MainMenu1: TMainMenu
    Top = 40
    object N1: TMenuItem
      Caption = #31995#32479#31649#29702
      object N2: TMenuItem
        Caption = #23494#30721#20462#25913
        OnClick = N2Click
      end
      object N3: TMenuItem
        Caption = #36864#20986#31995#32479
        OnClick = N3Click
      end
    end
    object N4: TMenuItem
      Caption = #26723#26696#31649#29702
      object N5: TMenuItem
        Caption = #26723#26696#32534#36753
        OnClick = N5Click
      end
      object N6: TMenuItem
        Caption = #26723#26696#26597#35810
        OnClick = N6Click
      end
      object N13: TMenuItem
        Caption = #26723#26696#35843#21160
        OnClick = N13Click
      end
    end
    object N7: TMenuItem
      Caption = #20449#24687#31649#29702
      object N8: TMenuItem
        Caption = #37096#38376#20449#24687
        OnClick = N8Click
      end
      object N11: TMenuItem
        Caption = #22522#30784#20449#24687
        OnClick = N11Click
      end
      object N12: TMenuItem
        Caption = #23703#20301#20449#24687
        OnClick = N12Click
      end
    end
    object N9: TMenuItem
      Caption = #24110#21161
      object N10: TMenuItem
        Caption = #20851#20110
        OnClick = N10Click
      end
    end
  end
  object Database1: TDatabase
    DatabaseName = 'human'
    DriverName = 'STANDARD'
    LoginPrompt = False
    Params.Strings = (
      'PATH=.\data'
      'DEFAULT DRIVER=PARADOX'
      'ENABLE BCD=FALSE')
    SessionName = 'Default'
    Left = 128
    Top = 40
  end
  object PopupMenu1: TPopupMenu
    Left = 32
    Top = 40
    object N14: TMenuItem
      Caption = #26723#26696#32534#36753
      OnClick = N14Click
    end
    object N15: TMenuItem
      Caption = #26723#26696#26597#35810
      OnClick = N15Click
    end
    object N21: TMenuItem
      Caption = #26723#26696#35843#21160
      OnClick = N21Click
    end
    object N16: TMenuItem
      Caption = '-'
    end
    object N17: TMenuItem
      Caption = #37096#38376#20449#24687
      OnClick = N17Click
    end
    object N18: TMenuItem
      Caption = #22522#30784#20449#24687
      OnClick = N18Click
    end
    object N19: TMenuItem
      Caption = #23703#20301#20449#24687
      OnClick = N19Click
    end
    object N20: TMenuItem
      Caption = '-'
    end
    object N23: TMenuItem
      Caption = #25171#21360#35774#32622
      OnClick = N23Click
    end
    object N22: TMenuItem
      Caption = #36864#20986#31995#32479
      OnClick = N22Click
    end
  end
  object ImageList1: TImageList
    Left = 64
    Top = 40
    Bitmap = {
      494C010106000900040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      0000000000003600000028000000400000003000000001001000000000000018
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000