本光盘是《Delphi 7应用教程》一书的配套光盘
源代码在线查看： unit1.dfm
object Form1: TForm1
Left = 218
Top = 166
Width = 717
Height = 273
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 8
Width = 56
Height = 13
Caption = #22909#21451#21495#65306
end
object Label2: TLabel
Left = 168
Top = 8
Width = 42
Height = 13
Caption = #22995#21517#65306
end
object Label3: TLabel
Left = 8
Top = 48
Width = 70
Height = 13
Caption = #22909#21451#31867#21035#65306
end
object Label4: TLabel
Left = 168
Top = 48
Width = 42
Height = 13
Caption = #24180#40836#65306
end
object Label5: TLabel
Left = 8
Top = 80
Width = 70
Height = 13
Caption = #20986#29983#26085#26399#65306
end
object Label6: TLabel
Left = 168
Top = 80
Width = 70
Height = 13
Caption = #30005#35805#21495#30721#65306
end
object Label7: TLabel
Left = 8
Top = 112
Width = 70
Height = 13
Caption = #36890#20449#22320#22336#65306
end
object Label8: TLabel
Left = 8
Top = 144
Width = 70
Height = 13
Caption = #30005#23376#37038#20214#65306
end
object Label9: TLabel
Left = 8
Top = 176
Width = 58
Height = 13
Caption = 'QQ'#21495#30721#65306
end
object Label10: TLabel
Left = 184
Top = 136
Width = 70
Height = 13
Caption = #20132#24448#22823#20107#65306
end
object Button1: TButton
Left = 24
Top = 208
Width = 57
Height = 25
Caption = #39318#35760#24405
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 88
Top = 208
Width = 49
Height = 25
Caption = #21069#31227
TabOrder = 1
OnClick = Button2Click
end
object Button3: TButton
Left = 144
Top = 208
Width = 49
Height = 25
Caption = #21518#31227
TabOrder = 2
OnClick = Button3Click
end
object Button4: TButton
Left = 200
Top = 208
Width = 49
Height = 25
Caption = #26411#35760#24405
TabOrder = 3
OnClick = Button4Click
end
object Button5: TButton
Left = 256
Top = 208
Width = 49
Height = 25
Caption = #36864#20986
TabOrder = 4
OnClick = Button5Click
end
object Button6: TButton
Left = 352
Top = 208
Width = 49
Height = 25
Caption = #22686#21152
TabOrder = 5
OnClick = Button6Click
end
object Button7: TButton
Left = 408
Top = 208
Width = 49
Height = 25
Caption = #20462#25913
TabOrder = 6
OnClick = Button7Click
end
object Button8: TButton
Left = 464
Top = 208
Width = 49
Height = 25
Caption = #21024#38500
TabOrder = 7
OnClick = Button8Click
end
object Button9: TButton
Left = 520
Top = 208
Width = 49
Height = 25
Caption = #26597#35810
TabOrder = 8
OnClick = Button9Click
end
object Button10: TButton
Left = 576
Top = 208
Width = 49
Height = 25
Caption = #30830#23450
TabOrder = 9
OnClick = Button10Click
end
object Button11: TButton
Left = 632
Top = 208
Width = 49
Height = 25
Caption = #21462#28040
TabOrder = 10
OnClick = Button11Click
end
object DBGrid1: TDBGrid
Left = 328
Top = 8
Width = 369
Height = 193
DataSource = DataSource1
TabOrder = 11
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnCellClick = DBGrid1CellClick
end
object Edit1: TEdit
Left = 72
Top = 8
Width = 89
Height = 21
TabOrder = 12
Text = 'Edit1'
end
object Edit2: TEdit
Left = 232
Top = 8
Width = 89
Height = 21
TabOrder = 13
Text = 'Edit2'
end
object ComboBox1: TComboBox
Left = 72
Top = 48
Width = 89
Height = 21
ItemHeight = 13
TabOrder = 14
Text = 'ComboBox1'
Items.Strings = (
#20146#25114
#26379#21451
#21516#23398)
end
object Edit3: TEdit
Left = 232
Top = 48
Width = 89
Height = 21
TabOrder = 15
Text = 'Edit3'
end
object Edit4: TEdit
Left = 72
Top = 80
Width = 89
Height = 21
TabOrder = 16
Text = 'Edit4'
end
object Edit5: TEdit
Left = 232
Top = 80
Width = 89
Height = 21
TabOrder = 17
Text = 'Edit5'
end
object Edit6: TEdit
Left = 72
Top = 112
Width = 249
Height = 21
TabOrder = 18
Text = 'Edit6'
end
object Edit7: TEdit
Left = 72
Top = 144
Width = 97
Height = 21
TabOrder = 19
Text = 'Edit7'
end
object Edit8: TEdit
Left = 72
Top = 176
Width = 97
Height = 21
TabOrder = 20
Text = 'Edit8'
end
object Memo1: TMemo
Left = 184
Top = 152
Width = 137
Height = 49
Lines.Strings = (
'Memo1')
TabOrder = 21
end
object Table1: TTable
DatabaseName = 'd:\DelphiApp\14\A\A_14_1'
TableName = #36890#35759#24405'.db'
Left = 368
Top = 16
end
object DataSource1: TDataSource
DataSet = Table1
Left = 440
Top = 16
end
object Query1: TQuery
Left = 368
Top = 56
end
end
