usubjectedit.dfm

来自「一.录入学生信息（预计有81个学生」· DFM 代码 · 共 93 行

object frmSubjectEdit: TfrmSubjectEdit
  Left = 507
  Top = 285
  Width = 264
  Height = 150
  ActiveControl = EditCode
  Caption = #26032#22686'/'#20462#25913#31185#30446#20449#24687
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 8
    Top = 16
    Width = 48
    Height = 12
    Caption = #31185#30446#32534#21495
  end
  object Label2: TLabel
    Left = 8
    Top = 48
    Width = 48
    Height = 12
    Caption = #31185#30446#21517#31216
  end
  object Panel1: TPanel
    Left = 0
    Top = 82
    Width = 256
    Height = 41
    Align = alBottom
    BevelOuter = bvLowered
    Ctl3D = True
    ParentCtl3D = False
    TabOrder = 0
    DesignSize = (
      256
      41)
    object cmdEnsure: TButton
      Left = 96
      Top = 9
      Width = 72
      Height = 22
      Anchors = [akTop, akRight]
      Caption = #30830#35748'(&E)'
      TabOrder = 0
      OnClick = cmdEnsureClick
    end
    object cmdCancel: TButton
      Left = 176
      Top = 9
      Width = 72
      Height = 22
      Anchors = [akTop, akRight]
      Cancel = True
      Caption = #21462#28040'(&X)'
      TabOrder = 1
      OnClick = cmdCancelClick
    end
  end
  object EditCode: TEdit
    Left = 64
    Top = 12
    Width = 166
    Height = 20
    MaxLength = 20
    TabOrder = 1
  end
  object EditName: TEdit
    Left = 64
    Top = 44
    Width = 166
    Height = 20
    MaxLength = 50
    TabOrder = 2
  end
  object dsQuery: TADODataSet
    Connection = DM.ADOLocal
    Parameters = <>
    Left = 32
    Top = 40
  end
end