shanchubanji.dfm

有不足之处请指出

object shanchubanjiForm: TshanchubanjiForm
  Left = 197
  Top = 123
  Hint = #21024#38500#19968#20010#32769#29677#32423#31383#21475
  AutoScroll = False
  Caption = #21024#38500#19968#20010#32769#29677#32423
  ClientHeight = 154
  ClientWidth = 430
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Label1: TLabel
    Left = 25
    Top = 18
    Width = 392
    Height = 16
    Caption = #35831#22312#29677#32423#21015#34920#20013#36873#25321#35201#21024#38500#30340#29677#32423#21517#31216#21518#21333#20987#21024#38500#25353#38062'.'
  end
  object ComboBox1: TComboBox
    Left = 77
    Top = 56
    Width = 279
    Height = 24
    ItemHeight = 16
    MaxLength = 20
    TabOrder = 0
    OnChange = ComboBox1Change
  end
  object Button1: TButton
    Left = 102
    Top = 104
    Width = 75
    Height = 25
    Caption = #21024#38500
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 229
    Top = 104
    Width = 75
    Height = 25
    Caption = #36864#20986
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = Button2Click
  end
  object DeletebanjiQuery: TQuery
    DatabaseName = 'D:\publicdataBase'
    SQL.Strings = (
      'Select * from classes;')
    Left = 336
    Top = 104
    object DeletebanjiQueryBianhao: TStringField
      FieldName = 'Bianhao'
      Origin = 'STUMANAGER."classes.DB".Bianhao'
      Size = 6
    end
    object DeletebanjiQueryMingcheng: TStringField
      FieldName = 'Mingcheng'
      Origin = 'STUMANAGER."classes.DB".Mingcheng'
    end
    object DeletebanjiQueryNansheng: TIntegerField
      FieldName = 'Nansheng'
      Origin = 'STUMANAGER."classes.DB".Nansheng'
    end
    object DeletebanjiQueryNvsheng: TIntegerField
      FieldName = 'Nvsheng'
      Origin = 'STUMANAGER."classes.DB".Nvsheng'
    end
  end
  object DeletexueshengQuery: TQuery
    DatabaseName = 'D:\publicdataBase'
    SQL.Strings = (
      'Select * from students;')
    Left = 376
    Top = 112
    object DeletexueshengQueryXuehao: TStringField
      FieldName = 'Xuehao'
      Origin = 'STUMANAGER."students.DB".Xuehao'
      Size = 8
    end
    object DeletexueshengQueryXingming: TStringField
      FieldName = 'Xingming'
      Origin = 'STUMANAGER."students.DB".Xingming'
      Size = 8
    end
    object DeletexueshengQueryXingbie: TStringField
      FieldName = 'Xingbie'
      Origin = 'STUMANAGER."students.DB".Xingbie'
      Size = 2
    end
    object DeletexueshengQueryBanji: TStringField
      FieldName = 'Banji'
      Origin = 'STUMANAGER."students.DB".Banji'
    end
    object DeletexueshengQueryChushengnianyue: TStringField
      FieldName = 'Chushengnianyue'
      Origin = 'STUMANAGER."students.DB".Chushengnianyue'
      Size = 16
    end
    object DeletexueshengQueryJiguan: TStringField
      FieldName = 'Jiguan'
      Origin = 'STUMANAGER."students.DB".Jiguan'
      Size = 40
    end
    object DeletexueshengQueryFumuxingming: TStringField
      FieldName = 'Fumuxingming'
      Origin = 'STUMANAGER."students.DB".Fumuxingming'
      Size = 8
    end
    object DeletexueshengQueryLianxidianhua: TStringField
      FieldName = 'Lianxidianhua'
      Origin = 'STUMANAGER."students.DB".Lianxidianhua'
      Size = 12
    end
    object DeletexueshengQueryXianzhuzhi: TStringField
      FieldName = 'Xianzhuzhi'
      Origin = 'STUMANAGER."students.DB".Xianzhuzhi'
      Size = 40
    end
  end
  object BanjiTable: TTable
    DatabaseName = 'D:\publicdataBase'
    TableName = 'classes.DB'
    Left = 384
    Top = 80
    object BanjiTableBianhao: TStringField
      FieldName = 'Bianhao'
      Size = 6
    end
    object BanjiTableMingcheng: TStringField
      FieldName = 'Mingcheng'
    end
    object BanjiTableNansheng: TIntegerField
      FieldName = 'Nansheng'
    end
    object BanjiTableNvsheng: TIntegerField
      FieldName = 'Nvsheng'
    end
  end
end