unit1.dfm.~25~

《Delphi程序员成长攻略》-蒙祖强龚涛的源代码

object Form1: TForm1
  Left = 0
  Top = 0
  Width = 535
  Height = 506
  Caption = #31616#21333#25968#25454#24211#24212#29992#31243#24207
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object SpeedButton1: TSpeedButton
    Left = 8
    Top = 336
    Width = 73
    Height = 22
    Caption = #31532#19968#26465#35760#24405
  end
  object SpeedButton2: TSpeedButton
    Left = 96
    Top = 336
    Width = 73
    Height = 22
    Caption = #19979#19968#26465#35760#24405
  end
  object SpeedButton3: TSpeedButton
    Left = 184
    Top = 336
    Width = 73
    Height = 22
    Caption = #19978#19968#26465#35760#24405
  end
  object SpeedButton4: TSpeedButton
    Left = 272
    Top = 336
    Width = 73
    Height = 22
    Caption = #26368#21518#19968#26465#35760#24405
  end
  object SpeedButton5: TSpeedButton
    Left = 8
    Top = 376
    Width = 73
    Height = 22
    Caption = #36716'    '#21040
  end
  object Label7: TLabel
    Left = 144
    Top = 380
    Width = 36
    Height = 13
    Caption = #26465#35760#24405
  end
  object DBGrid1: TDBGrid
    Left = 5
    Top = 4
    Width = 515
    Height = 169
    DataSource = DataSource1
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
  end
  object Button1: TButton
    Left = 448
    Top = 416
    Width = 75
    Height = 25
    Caption = 'Button1'
    TabOrder = 1
    OnClick = Button1Click
  end
  object GroupBox1: TGroupBox
    Left = 7
    Top = 184
    Width = 513
    Height = 139
    TabOrder = 2
    object Label1: TLabel
      Left = 43
      Top = 28
      Width = 41
      Height = 25
      AutoSize = False
      Caption = #22995#21517
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 41
      Top = 68
      Width = 41
      Height = 25
      AutoSize = False
      Caption = #24615#21035
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 10
      Top = 108
      Width = 65
      Height = 24
      AutoSize = False
      Caption = #20986#29983#26085#26399
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 261
      Top = 26
      Width = 57
      Height = 25
      AutoSize = False
      Caption = #20986#29983#22320#22336
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 291
      Top = 68
      Width = 41
      Height = 25
      AutoSize = False
      Caption = #19987#19994
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 290
      Top = 108
      Width = 41
      Height = 25
      AutoSize = False
      Caption = #25104#32489
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object DBEdit1: TDBEdit
      Left = 80
      Top = 24
      Width = 121
      Height = 21
      DataField = 'NAME'
      DataSource = DataSource1
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 80
      Top = 65
      Width = 121
      Height = 21
      DataField = 'GENDER'
      DataSource = DataSource1
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 80
      Top = 104
      Width = 121
      Height = 21
      DataField = 'BIRTHDAY'
      DataSource = DataSource1
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 328
      Top = 24
      Width = 121
      Height = 21
      DataField = 'NATIVE'
      DataSource = DataSource1
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 328
      Top = 64
      Width = 121
      Height = 21
      DataField = 'SPECIALITY'
      DataSource = DataSource1
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 328
      Top = 104
      Width = 121
      Height = 21
      DataField = 'GRADE'
      DataSource = DataSource1
      TabOrder = 5
    end
  end
  object Edit1: TEdit
    Left = 96
    Top = 376
    Width = 41
    Height = 21
    TabOrder = 3
    Text = '1'
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 424
    Top = 80
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'MyDSN'
    Exclusive = True
    TableName = 'dbo.STU'
    Left = 424
    Top = 40
  end
end