shujuku.~dfm

花了两个多星期写的考勤系统

object Form1: TForm1
  Left = 283
  Top = 146
  Width = 696
  Height = 567
  Caption = #25968#25454#24211
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 337
    Top = 0
    Height = 540
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 337
    Height = 540
    Align = alLeft
    Caption = 'Panel1'
    TabOrder = 0
    object Label1: TLabel
      Left = 56
      Top = 56
      Width = 57
      Height = 17
      AutoSize = False
      Caption = 'stuNo'
    end
    object Label2: TLabel
      Left = 56
      Top = 80
      Width = 57
      Height = 17
      AutoSize = False
      Caption = 'stuName'
    end
    object Label3: TLabel
      Left = 56
      Top = 104
      Width = 57
      Height = 17
      AutoSize = False
      Caption = 'sex'
    end
    object Label4: TLabel
      Left = 56
      Top = 128
      Width = 57
      Height = 17
      AutoSize = False
      Caption = 'age'
    end
    object Label5: TLabel
      Left = 19
      Top = 192
      Width = 70
      Height = 25
      AutoSize = False
      Caption = #36873#25321#34920
    end
    object DBGrid1: TDBGrid
      Left = 0
      Top = 248
      Width = 321
      Height = 193
      DataSource = DataSource1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = 33023
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clPurple
      TitleFont.Height = -4
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnCellClick = DBGrid1CellClick
    end
    object Edit1: TEdit
      Left = 128
      Top = 56
      Width = 137
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
    end
    object Edit2: TEdit
      Left = 128
      Top = 80
      Width = 137
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 2
    end
    object Edit3: TEdit
      Left = 128
      Top = 104
      Width = 137
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 3
    end
    object Edit4: TEdit
      Left = 128
      Top = 128
      Width = 137
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 4
    end
    object Button1: TButton
      Left = 88
      Top = 160
      Width = 49
      Height = 25
      Caption = 'insert'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 5
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 192
      Top = 160
      Width = 57
      Height = 25
      Caption = 'open'
      TabOrder = 6
    end
    object xuanze: TButton
      Left = 8
      Top = 24
      Width = 81
      Height = 25
      Caption = #36873#25321#25968#25454#24211
      TabOrder = 7
      OnClick = xuanzeClick
    end
    object dakai: TButton
      Left = 96
      Top = 24
      Width = 81
      Height = 25
      Caption = #25171#24320#25968#25454#24211
      TabOrder = 8
      OnClick = dakaiClick
    end
    object Button5: TButton
      Left = 192
      Top = 24
      Width = 81
      Height = 25
      Caption = #20851#38381#25968#25454#24211
      TabOrder = 9
      OnClick = Button5Click
    end
    object ComboBox1: TComboBox
      Left = 16
      Top = 216
      Width = 145
      Height = 21
      ItemHeight = 13
      TabOrder = 10
      Text = #35831#36873#25321#34920
      OnChange = ComboBox1Change
    end
  end
  object Panel2: TPanel
    Left = 340
    Top = 0
    Width = 348
    Height = 540
    Align = alClient
    Caption = 'Panel2'
    TabOrder = 1
    object Label6: TLabel
      Left = 24
      Top = 40
      Width = 73
      Height = 17
      AutoSize = False
      Caption = #26381#21153#22120'IP'
    end
    object Label7: TLabel
      Left = 24
      Top = 64
      Width = 65
      Height = 17
      AutoSize = False
      Caption = #30331#38470#21517
    end
    object Label8: TLabel
      Left = 24
      Top = 88
      Width = 65
      Height = 17
      AutoSize = False
      Caption = #23494#30721
    end
    object Label9: TLabel
      Left = 24
      Top = 152
      Width = 81
      Height = 17
      AutoSize = False
      Caption = #36873#25321#34920
    end
    object Label10: TLabel
      Left = 24
      Top = 120
      Width = 89
      Height = 17
      AutoSize = False
      Caption = #36873#25321#25968#25454#24211
    end
    object Edit5: TEdit
      Left = 120
      Top = 40
      Width = 105
      Height = 21
      TabOrder = 0
      Text = '127.0.0.1'
      OnKeyPress = Edit5KeyPress
    end
    object Edit6: TEdit
      Left = 120
      Top = 64
      Width = 105
      Height = 21
      TabOrder = 1
      Text = 'sa'
    end
    object Edit7: TEdit
      Left = 120
      Top = 88
      Width = 105
      Height = 21
      PasswordChar = '*'
      TabOrder = 2
      Text = 'sa'
    end
    object Button3: TButton
      Left = 240
      Top = 40
      Width = 81
      Height = 25
      Caption = #36830#25509#25968#25454#24211
      TabOrder = 3
      OnClick = Button3Click
    end
    object DBGrid2: TDBGrid
      Left = 16
      Top = 248
      Width = 320
      Height = 193
      DataSource = DataSource2
      TabOrder = 4
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object ComboBox2: TComboBox
      Left = 120
      Top = 152
      Width = 105
      Height = 21
      ItemHeight = 13
      TabOrder = 5
      OnChange = ComboBox2Change
    end
    object Edit8: TEdit
      Left = 120
      Top = 120
      Width = 105
      Height = 21
      AutoSize = False
      TabOrder = 6
      Text = 'Northwind'
    end
  end
  object DataSource1: TDataSource
    DataSet = ADOTable1
    Left = 288
    Top = 56
  end
  object OpenDialog1: TOpenDialog
    FileName = 'E:\'#23398#20064'\delphi'#32451#20064'\'#25968#25454#24211'\DBtest\hyydb1.mdb'
    Filter = #25968#25454#24211'|*mdb|SQL|*sql'
    Left = 344
  end
  object ADOTable1: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    Left = 288
    Top = 32
  end
  object ADOConnection1: TADOConnection
    KeepConnection = False
    LoginPrompt = False
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 288
  end
  object ADOConnection2: TADOConnection
    LoginPrompt = False
    Left = 396
  end
  object ADOTable2: TADOTable
    Connection = ADOConnection2
    Left = 436
  end
  object DataSource2: TDataSource
    DataSet = ADOTable2
    Left = 476
  end
end