unit7.dfm

来自「学校学籍管理系统」· DFM 代码 · 共 379 行

object studen: Tstuden
  Left = 267
  Top = 385
  Width = 488
  Height = 235
  BorderIcons = []
  Caption = #26032#29983#30331#35760
  Color = clSkyBlue
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 13
    Top = 13
    Width = 28
    Height = 14
    Caption = #23398#21495
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 118
    Top = 13
    Width = 28
    Height = 14
    Caption = #22995#21517
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 11
    Top = 48
    Width = 56
    Height = 14
    Caption = #23601#35835#19987#19994
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label4: TLabel
    Left = 192
    Top = 49
    Width = 28
    Height = 14
    Caption = #29677#32423
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 318
    Top = 49
    Width = 56
    Height = 14
    Caption = #20837#23398#26085#26399
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label6: TLabel
    Left = 11
    Top = 83
    Width = 56
    Height = 14
    Caption = #23478#24237#20303#22336
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label7: TLabel
    Left = 299
    Top = 83
    Width = 56
    Height = 14
    Caption = #23478#38271#22995#21517
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 12
    Top = 115
    Width = 56
    Height = 14
    Caption = #32852#31995#30005#35805
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 323
    Top = 13
    Width = 56
    Height = 14
    Caption = #20986#29983#26085#26399
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label10: TLabel
    Left = 227
    Top = 13
    Width = 28
    Height = 14
    Caption = #24615#21035
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label11: TLabel
    Left = 198
    Top = 115
    Width = 56
    Height = 14
    Caption = #26159#21542#23492#23487
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label12: TLabel
    Left = 349
    Top = 115
    Width = 28
    Height = 14
    Caption = #25151#21495
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label13: TLabel
    Left = 11
    Top = 147
    Width = 56
    Height = 14
    Caption = #23398#20064#24180#27573
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label14: TLabel
    Left = 201
    Top = 147
    Width = 28
    Height = 14
    Caption = #22791#27880
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Edit1: TEdit
    Left = 149
    Top = 10
    Width = 63
    Height = 21
    TabOrder = 0
  end
  object ComboBox1: TComboBox
    Left = 259
    Top = 10
    Width = 49
    Height = 21
    ItemHeight = 13
    TabOrder = 1
    Items.Strings = (
      #30007
      #22899)
  end
  object DateTimePicker1: TDateTimePicker
    Left = 383
    Top = 10
    Width = 83
    Height = 21
    Date = 38033.000000000000000000
    Time = 38033.000000000000000000
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    TabStop = False
  end
  object DateTimePicker2: TDateTimePicker
    Left = 375
    Top = 46
    Width = 90
    Height = 21
    Date = 38033.000000000000000000
    Time = 38033.000000000000000000
    TabOrder = 3
    TabStop = False
  end
  object Edit2: TEdit
    Left = 75
    Top = 80
    Width = 199
    Height = 21
    TabOrder = 4
  end
  object Edit3: TEdit
    Left = 363
    Top = 80
    Width = 102
    Height = 21
    TabOrder = 5
  end
  object Edit4: TEdit
    Left = 75
    Top = 112
    Width = 73
    Height = 21
    TabOrder = 6
    OnKeyPress = Edit4KeyPress
  end
  object ComboBox4: TComboBox
    Left = 265
    Top = 112
    Width = 58
    Height = 21
    ItemHeight = 13
    TabOrder = 7
    Items.Strings = (
      #26159
      #21542)
  end
  object Edit6: TEdit
    Left = 235
    Top = 144
    Width = 231
    Height = 21
    TabOrder = 8
  end
  object MaskEdit2: TMaskEdit
    Left = 48
    Top = 10
    Width = 57
    Height = 21
    EditMask = '000000;0;_'
    MaxLength = 6
    TabOrder = 9
  end
  object Button1: TButton
    Left = 143
    Top = 176
    Width = 64
    Height = 23
    Caption = #28155' '#21152
    TabOrder = 10
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 287
    Top = 176
    Width = 58
    Height = 23
    Caption = #20851' '#38381
    TabOrder = 11
    OnClick = Button2Click
  end
  object DBLookupComboBox1: TDBLookupComboBox
    Left = 72
    Top = 45
    Width = 108
    Height = 21
    DataField = 'jian'
    DataSource = DataSource1
    KeyField = 'xi'
    ListField = 'xi'
    ListSource = DataSource2
    TabOrder = 12
  end
  object DBLookupComboBox2: TDBLookupComboBox
    Left = 226
    Top = 45
    Width = 80
    Height = 21
    DataField = 'bang'
    DataSource = DataSource1
    KeyField = 'ban'
    ListField = 'ban'
    ListSource = DataSource2
    TabOrder = 13
  end
  object DBLookupComboBox3: TDBLookupComboBox
    Left = 383
    Top = 110
    Width = 81
    Height = 21
    DataField = 'fon'
    DataSource = DataSource1
    KeyField = 'fon'
    ListField = 'fon'
    ListSource = DataSource3
    TabOrder = 14
  end
  object ComboBox2: TComboBox
    Left = 75
    Top = 144
    Width = 97
    Height = 21
    ItemHeight = 13
    TabOrder = 15
    Items.Strings = (
      '2002'
      '2003'
      '2004'
      '2005'
      '2006'
      '2007'
      '2008')
  end
  object DataSource1: TDataSource
    DataSet = Dm.studen
    Left = 144
    Top = 16
  end
  object DataSource2: TDataSource
    DataSet = Dm.ban
    Left = 176
    Top = 104
  end
  object DataSource3: TDataSource
    DataSet = Dm.su
    Left = 296
    Top = 80
  end
end