archives_class.dfm

适合新手 绝对精品 档案管理系统 本人花钱购买来的源代

inherited F_Class: TF_Class
  Tag = 1
  Left = 236
  Top = 179
  Width = 588
  Height = 348
  Caption = #26723#26696#20998#31867#31649#29702
  OldCreateOrder = True
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter [0]
    Left = 0
    Top = 0
    Height = 321
  end
  object TV_Class: TTreeView [1]
    Left = 8
    Top = 8
    Width = 185
    Height = 297
    Indent = 19
    PopupMenu = PopupMenu1
    TabOrder = 0
    OnDblClick = TV_ClassDblClick
  end
  inherited cmdadd: TButton
    Left = 224
    Top = 240
    TabOrder = 1
  end
  inherited cmdpre: TButton
    Left = 224
    Top = 280
    TabOrder = 2
    OnClick = cmdpreClick
  end
  inherited cmdmodi: TButton
    Left = 288
    Top = 240
    TabOrder = 3
  end
  inherited cmdnext: TButton
    Left = 288
    Top = 280
    TabOrder = 4
    OnClick = cmdnextClick
  end
  inherited cmdsearch: TButton
    Left = 360
    Top = 240
    TabOrder = 5
  end
  inherited cmdlast: TButton
    Left = 360
    Top = 280
    TabOrder = 6
    OnClick = cmdlastClick
  end
  inherited cmddel: TButton
    Left = 424
    Top = 240
    TabOrder = 7
    OnClick = cmddelClick
  end
  inherited cmdstore: TButton
    Left = 424
    Top = 280
    TabOrder = 8
  end
  inherited cmdfirst: TButton
    Left = 488
    Top = 240
    TabOrder = 9
    OnClick = cmdfirstClick
  end
  inherited cmdquit: TButton
    Left = 488
    Top = 280
    TabOrder = 10
  end
  object Panel1: TPanel
    Left = 200
    Top = 8
    Width = 369
    Height = 225
    BevelOuter = bvNone
    BorderStyle = bsSingle
    UseDockManager = False
    TabOrder = 11
    object Label5: TLabel
      Left = 9
      Top = 150
      Width = 60
      Height = 13
      Caption = #24314#26723#20154#21592#65306
      FocusControl = DBEdit5
    end
    object Label6: TLabel
      Left = 153
      Top = 144
      Width = 60
      Height = 13
      Caption = #24314#26723#26085#26399#65306
      FocusControl = DBEdit6
    end
    object Label7: TLabel
      Left = 9
      Top = 177
      Width = 60
      Height = 13
      Caption = #20462#25913#20154#21592#65306
      FocusControl = DBEdit7
    end
    object Label8: TLabel
      Left = 153
      Top = 178
      Width = 60
      Height = 13
      Caption = #20462#25913#26085#26399#65306
      FocusControl = DBEdit8
    end
    object SButton1: TSpeedButton
      Left = 329
      Top = 139
      Width = 23
      Height = 22
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
        00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
        0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
        903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
        9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
        03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
        77037F3377777773337F088887707888870373F3337773F33373307880707088
        7033373FF737F73FF733337003303300733333777337FF777333333333000333
        3333333333777333333333333333333333333333333333333333}
      NumGlyphs = 2
      ParentFont = False
      OnClick = SButton1Click
    end
    object SButton2: TSpeedButton
      Left = 329
      Top = 175
      Width = 24
      Height = 22
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
        00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
        0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
        903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
        9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
        03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
        77037F3377777773337F088887707888870373F3337773F33373307880707088
        7033373FF737F73FF733337003303300733333777337FF777333333333000333
        3333333333777333333333333333333333333333333333333333}
      NumGlyphs = 2
      ParentFont = False
      OnClick = SButton2Click
    end
    object GroupBox1: TGroupBox
      Left = 7
      Top = 5
      Width = 354
      Height = 132
      Caption = #20998#31867#20449#24687
      TabOrder = 0
      object Label1: TLabel
        Left = 8
        Top = 16
        Width = 63
        Height = 13
        Caption = #20998#31867#24207#21495#65306' '
        FocusControl = DBEdit1
      end
      object Label2: TLabel
        Left = 192
        Top = 16
        Width = 72
        Height = 13
        Caption = #26723#26696#20998#31867#21517#65306
        FocusControl = DBEdit2
      end
      object Label3: TLabel
        Left = 8
        Top = 64
        Width = 108
        Height = 13
        Caption = #26723#26696#20998#31867#25152#23646#37096#38376#65306
        FocusControl = DBEdit3
      end
      object Label4: TLabel
        Left = 192
        Top = 64
        Width = 36
        Height = 13
        Caption = #22791#27880#65306
        FocusControl = DBEdit4
      end
      object DBEdit1: TDBEdit
        Left = 8
        Top = 32
        Width = 134
        Height = 21
        DataField = 'Class_ID'
        DataSource = DM.DS_Class
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        ReadOnly = True
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Left = 192
        Top = 32
        Width = 137
        Height = 21
        DataField = 'Class_Name'
        DataSource = DM.DS_Class
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        ReadOnly = True
        TabOrder = 1
      end
      object DBEdit3: TDBEdit
        Left = 8
        Top = 88
        Width = 129
        Height = 21
        DataField = 'Class_Branch'
        DataSource = DM.DS_Class
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        ReadOnly = True
        TabOrder = 2
      end
      object DBEdit4: TDBEdit
        Left = 192
        Top = 88
        Width = 137
        Height = 21
        DataField = 'Class_Memo'
        DataSource = DM.DS_Class
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
        ReadOnly = True
        TabOrder = 3
      end
    end
    object DBEdit5: TDBEdit
      Left = 72
      Top = 145
      Width = 73
      Height = 21
      DataField = 'Archives_SPerson'
      DataSource = DM.DS_Class
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit6: TDBEdit
      Left = 217
      Top = 140
      Width = 104
      Height = 21
      DataField = 'Archives_SDate'
      DataSource = DM.DS_Class
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit7: TDBEdit
      Left = 74
      Top = 174
      Width = 71
      Height = 21
      DataField = 'Archives_MPerson'
      DataSource = DM.DS_Class
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 3
    end
    object DBEdit8: TDBEdit
      Left = 218
      Top = 176
      Width = 103
      Height = 21
      DataField = 'Archives_MDate'
      DataSource = DM.DS_Class
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      ReadOnly = True
      TabOrder = 4
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 96
    Top = 192
    object P_Add: TMenuItem
      Caption = #22686#21152#20998#31867
      OnClick = ToolButton1Click
    end
    object P_Modify: TMenuItem
      Caption = #32534#36753#20998#31867
      OnClick = ToolButton2Click
    end
    object P_Delete: TMenuItem
      Caption = #21024#38500#20998#31867
      OnClick = ToolButton3Click
    end
  end
end