student.dfm

校园刷卡系统

object StudentForm: TStudentForm
  Left = 254
  Top = 161
  Width = 882
  Height = 555
  BorderIcons = [biHelp]
  Caption = #26657#22253#21047#21345#28040#36153#31995#32479'-'#23398#29983#20449#24687#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 48
    Top = 464
    Width = 75
    Height = 13
    Caption = #24403#21069#25805#20316#21592'     '
  end
  object showname: TLabel
    Left = 123
    Top = 464
    Width = 99
    Height = 13
    Caption = '                                 '
  end
  object showtime: TLabel
    Left = 256
    Top = 464
    Width = 126
    Height = 13
    Caption = '                                          '
  end
  object Button1: TButton
    Left = 768
    Top = 448
    Width = 75
    Height = 25
    Caption = #20851#38381
    TabOrder = 0
    OnClick = N4Click
  end
  object PageControl1: TPageControl
    Left = 16
    Top = 24
    Width = 849
    Height = 417
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = #23398#29983#20449#24687#31649#29702' '
      object DBGrid1: TDBGrid
        Left = 16
        Top = 16
        Width = 817
        Height = 249
        DataSource = DataSource1
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899#36755#20837#27861' 3.0 '#29256
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnCellClick = DBGrid1CellClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'SchoolID'
            Title.Caption = #23398#21495
            Width = 160
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Name'
            Title.Caption = #22995#21517
            Width = 135
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Sex'
            Title.Caption = #24615#21035
            Width = 73
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Id'
            Title.Caption = #36523#20221#35777#21495
            Width = 151
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Phone'
            Title.Caption = #32852#31995#30005#35805
            Width = 277
            Visible = True
          end>
      end
      object RadioGroup1: TRadioGroup
        Left = 32
        Top = 272
        Width = 305
        Height = 105
        Caption = #25805#20316#36873#25321
        Columns = 2
        Items.Strings = (
          #26032#22686#23398#29983
          #20462#25913#24403#21069#23398#29983
          #21024#38500#24403#21069#23398#29983
          #28165#38500#36873#25321)
        TabOrder = 1
        OnClick = RadioGroup1Click
      end
      object DBNavigator1: TDBNavigator
        Left = 480
        Top = 304
        Width = 184
        Height = 25
        DataSource = DataSource1
        VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
        TabOrder = 2
        OnClick = DBNavigator1Click
      end
    end
    object TabSheet2: TTabSheet
      Caption = #26032#22686#23398#29983
      ImageIndex = 1
      object Label2: TLabel
        Left = 184
        Top = 160
        Width = 39
        Height = 13
        Caption = #24615#21035#65306' '
      end
      object LabeledEdit1: TLabeledEdit
        Left = 184
        Top = 48
        Width = 121
        Height = 21
        EditLabel.Width = 51
        EditLabel.Height = 13
        EditLabel.Caption = #23398#21495#65306'     '
        LabelPosition = lpAbove
        LabelSpacing = 3
        TabOrder = 0
      end
      object LabeledEdit2: TLabeledEdit
        Left = 184
        Top = 112
        Width = 121
        Height = 21
        EditLabel.Width = 45
        EditLabel.Height = 13
        EditLabel.Caption = #22995#21517#65306'   '
        LabelPosition = lpAbove
        LabelSpacing = 3
        TabOrder = 1
      end
      object LabeledEdit4: TLabeledEdit
        Left = 184
        Top = 304
        Width = 121
        Height = 21
        EditLabel.Width = 66
        EditLabel.Height = 13
        EditLabel.Caption = #32852#31995#30005#35805#65306'  '
        LabelPosition = lpAbove
        LabelSpacing = 3
        TabOrder = 2
      end
      object sex: TComboBox
        Left = 184
        Top = 176
        Width = 145
        Height = 21
        ItemHeight = 13
        TabOrder = 3
        Items.Strings = (
          #30007
          #22899)
      end
      object Button2: TButton
        Left = 400
        Top = 320
        Width = 75
        Height = 25
        Caption = #25191#34892
        TabOrder = 4
        OnClick = Button2Click
      end
      object LabeledEdit3: TLabeledEdit
        Left = 184
        Top = 240
        Width = 121
        Height = 21
        EditLabel.Width = 72
        EditLabel.Height = 13
        EditLabel.Caption = #36523#20221#35777#21495#65306'    '
        LabelPosition = lpAbove
        LabelSpacing = 3
        TabOrder = 5
      end
    end
  end
  object Query1: TQuery
    DatabaseName = 'SK'
    Left = 696
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'SK'
    TableName = 'Student.db'
    Left = 632
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 664
  end
  object Timer1: TTimer
    OnTimer = Timer1Timer
    Left = 8
    Top = 464
  end
  object MainMenu1: TMainMenu
    Left = 824
    object N1: TMenuItem
      Caption = #25991#20214'(&X)'
      object N4: TMenuItem
        Caption = #20851#38381'(&Y)'
        OnClick = N4Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object N6: TMenuItem
        Caption = #36864#20986'(&Z)'
        OnClick = N6Click
      end
    end
    object N2: TMenuItem
      Caption = #26597#35810'(&Y)'
      object N7: TMenuItem
        Caption = #24320#22987#24037#20316#26102#38388'(&T)'
        OnClick = N7Click
      end
      object N8: TMenuItem
        Caption = '-'
      end
      object N12: TMenuItem
        Caption = #25628#32034#23398#29983#20449#24687'(&I)'
        ShortCut = 16457
        OnClick = N12Click
      end
    end
    object N3: TMenuItem
      Caption = #24110#21161'(&Z)'
      object N10: TMenuItem
        Caption = #20851#20110#23398#29983#20449#24687#31649#29702#21592#23376#31995#32479'(&H)'
        OnClick = N10Click
      end
      object N15: TMenuItem
        Caption = '-'
      end
      object N16: TMenuItem
        Caption = #20851#20110'...(&G)'
        OnClick = N16Click
      end
    end
  end
end