urrgl.dfm

学生信息管理系统

inherited FRrgl: TFRrgl
  Left = 173
  Top = 154
  Caption = #20154#21592#31649#29702
  PixelsPerInch = 96
  TextHeight = 12
  inherited Splitter1: TSplitter
    Left = 221
  end
  inherited Panel1: TPanel
    Width = 221
    inherited Shape1: TShape
      Width = 221
    end
    object Label5: TLabel
      Left = 44
      Top = 81
      Width = 42
      Height = 13
      Caption = #29992#25143#21517
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label1: TLabel
      Left = 71
      Top = 34
      Width = 96
      Height = 16
      Caption = #20154#21592#20449#24687#24405#20837
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label2: TLabel
      Left = 44
      Top = 166
      Width = 42
      Height = 13
      Caption = #23494'  '#30721
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Shape2: TShape
      Left = -16
      Top = 204
      Width = 236
      Height = 1
    end
    object Label3: TLabel
      Left = 44
      Top = 137
      Width = 42
      Height = 13
      Caption = #26435'  '#38480
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label4: TLabel
      Left = 44
      Top = 109
      Width = 42
      Height = 13
      Caption = #31185'  '#32452
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object DBEh_xm: TDBEditEh
      Left = 92
      Top = 78
      Width = 102
      Height = 18
      DataField = 'username'
      DataSource = DataSource
      EditButtons = <>
      Flat = True
      TabOrder = 0
      Visible = True
      OnKeyPress = FormKeyPress
    end
    object DBEh_rs: TDBEditEh
      Left = 92
      Top = 163
      Width = 102
      Height = 18
      DataField = 'mm'
      DataSource = DataSource
      EditButtons = <>
      Flat = True
      TabOrder = 3
      Visible = True
      OnKeyPress = DBEh_rsKeyPress
    end
    object DBComboBoxEh1: TDBComboBoxEh
      Left = 92
      Top = 134
      Width = 102
      Height = 18
      DataField = 'qx'
      DataSource = DataSource
      EditButtons = <>
      Flat = True
      Items.Strings = (
        '0'
        '1'
        '2'
        '3'
        '4'
        '5'
        '6')
      TabOrder = 2
      Visible = True
      OnKeyPress = FormKeyPress
    end
    object DBComboBoxEh2: TDBComboBoxEh
      Left = 92
      Top = 106
      Width = 102
      Height = 18
      DataField = 'kz'
      DataSource = DataSource
      EditButtons = <>
      Flat = True
      TabOrder = 1
      Visible = True
      OnKeyPress = FormKeyPress
    end
  end
  inherited Panel2: TPanel
    Left = 224
    Width = 551
    inherited DBGridEh: TDBGridEh
      Width = 551
      Font.Height = -19
      ParentFont = False
      Columns = <
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'vxh'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          Footers = <>
          Title.Alignment = taCenter
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -19
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = 'username'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #29992#25143#21517
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -19
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
        end
        item
          EditButtons = <>
          FieldName = 'kz'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #31185' '#32452
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -19
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = 'qx'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #26435' '#38480
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -19
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = 'mm'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #23494' '#30721
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clWindowText
          Title.Font.Height = -19
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 100
        end>
    end
  end
  inherited ADOQuery: TADOQuery
    SQL.Strings = (
      'select * from STU_rrgl order by id')
    object ADOQueryID: TAutoIncField [0]
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOQueryusername: TWideStringField [1]
      FieldName = 'username'
      Size = 12
    end
    object ADOQuerykz: TWideStringField [2]
      FieldName = 'kz'
      Size = 10
    end
    object ADOQueryqx: TSmallintField [3]
      FieldName = 'qx'
    end
    object ADOQuerymm: TWideStringField [4]
      FieldName = 'mm'
      Size = 10
    end
  end
end