uczrz.~dfm

来自「学生信息管理系统」· ~DFM 代码 · 共 95 行

inherited FCzrz: TFCzrz
  Caption = #25805#20316#26085#24535
  PixelsPerInch = 96
  TextHeight = 12
  inherited Panel2: TPanel
    inherited DBGridEh: TDBGridEh
      Columns = <
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'vxh'
          Footers = <>
          Title.Alignment = taCenter
          Width = 32
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'kz'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #31185' '#32452
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'username'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #22995' '#21517
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'nj'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #24180' '#32423
          Width = 49
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'ss'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #35797' '#23460
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'sj'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #24405#20837#26102#38388
        end>
    end
  end
  inherited ADOQuery: TADOQuery
    Active = True
    CursorType = ctStatic
    SQL.Strings = (
      'select * from STU_czrz')
    Left = 232
    Top = 80
    object ADOQueryID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOQueryusername: TWideStringField
      FieldName = 'username'
      Size = 12
    end
    object ADOQuerykz: TWideStringField
      FieldName = 'kz'
      Size = 10
    end
    object ADOQueryss: TWideStringField
      FieldName = 'ss'
      Size = 16
    end
    object ADOQuerysj: TDateTimeField
      FieldName = 'sj'
    end
    object ADOQuerynj: TWideStringField
      FieldName = 'nj'
      Size = 4
    end
  end
  inherited DataSource: TDataSource
    Left = 268
    Top = 87
  end
end