目 录 2
第1周 浏 览 2
第1天创建第一个Delphi应用程序 2
1.1 欢迎来到奇妙的Delphi世界 2
1.2Delphi和数据库 2
1.3创建第一个Delphi项目（Project） 2
1.4 Forml窗体 5
1.5修改Forml的属性 6
1.6设置窗体的Name属性 7
1.7在frmHello窗体中放置按钮 8
1.8给Exit按钮添加代码 12
1.9 Exit按钮的代码 14
1.10 Application.Terminate语句 15
1.11在frmHello窗体中增加一个编辑框，并放置另外两个按钮 17
1.12给Hello按钮添加代码 18
1.1 3给Clear按钮添加的Onclick事件代码 20
1.14设置编辑框的其他属性 20
1.15简化符号 21
1.16 小结 22
1.17 问与答 22
1.18测验 22
1.19练习 23
1.20测验答案 23
1.21练习答案 23
2.2设置工作目录 24
2.1数据库桌面（DatabaseDesktop） 24
第2天数据库 24
2.3设置工具目录的别名 26
2.4用DatabaseDesktop创建表 26
2.5在Customer表中输入数据 29
2.6对表中记录排序 30
2.7关键字段必须是唯一的 31
2.8记录的移动 33
2.9数据库、表及其他 34
2.10设计表结构 34
2.11附加链接 37
2.12 小结 38
2.13问与答 38
2.16测验答案 39
2.17练习答案 39
2.14 测验 39
2.15练习 39
第3天创建第一个Delphi数据库程序 41
3.1数据控件组 41
3.2在窗体中放置数据控件组 41
3.3 了解由Database Form Expert创建的窗体 45
3.4 执行MyCust程序 51
3.5 Navigator控件 51
3.6关于MyCust项目窗体 53
3.7还需要做些什么工作 53
3.9 问与答 54
3.8 小结 54
3.10测验 55
3.11 练习 55
3.12测验答案 55
3.13练习答案 55
第4天读写字段值 56
4.1数据组件属性 56
4.2Table组件的Active属性 56
4.3 Table组件的DataBaseNane 属性 56
4.4 Table组件的TableName属性 56
4.8 Navigator控件 57
4.7 DBGrid控件 57
4.6 DataSource组件 57
4.5 Table组件的ReadOnly属性 57
4.9 FormCreate事件 59
4.10使用Fields Editor（字段编辑器） 61
4.11 关于窗口中的CustNum和LastName字段 62
4.12用代码改变字段属性 65
4.13设置Exit按钮 67
4.14设计Checkboxes（复选框） 67
4.15读字段值 69
4.16把字段值赋予变量 72
4.17设置字段值 74
4.18全局变量和局部变量 76
4.20问与答 77
4.19小结 77
4.21 测验 78
4.22练习 78
4.23测验答案 78
4.24练习答案 78
第5天计算字段 80
5.1构造和设计数据库 80
5.2计算字段 81
5.3用Database Desktop构造表 82
5.4 实现TotPrice.EXE程序 83
5.5 在Parts.DB和Customer.DB表中输入数据 86
5.6使用Fields Editor添加字段对象 86
5.7制作一个Exit按钮 89
5.8放置计算字段 90
5.9 给TotPrice项目增加Parts.DB表 92
5.10将Parts.DB表中的值填入ItemDescription字段 96
5.11 更新Items.DB表 99
5.12计算总价 100
5.13 小结 102
5.14 问与答 102
5.15测验 103
5.16练习 103
5.17测验答案 103
5.18练习答案 103
6.2主要索引和次级索引（Primary and Secondary Indexes） 106
6.1One2Many程序 106
第6天链接表 106
6.3制作One2Many程序 110
6.4保存项目文件 114
6.5改变Table组件的Name属性 115
6.6放置Exit按钮 115
6.7创建其他次级索引 117
6.8 创建Parts.DB表和Items.DB表的“一对多”关系 118
6.9保存项目文件 120
6.10小结 121
6.11 问与答 121
6.12测验 121
6.15练习答案 122
6.13练习 122
6.14测验答案 122
第7天查找和确认数据 123
7.1 SearchMe程序 123
7.2实现SearchMe程序 124
7.3实现Search按钮 125
7.4当运行出现错误时 127
7.5关于FindKey()方法的进一步讨论 128
7.6确认用户输入的数据 130
7.7 发生异常（Raising an Exception） 132
7.8 Required属性 134
7.9 关于关键字段 134
7.10按其他字段检索 135
7.11 小结 136
7.12 问与答 137
7.13测验 137
7.14 练习 137
7.15测验答案 138
7.1 6练习答案 138
第2周 浏 览 141
第8天实现数据输入窗体 141
8.1Clients程序 141
8.2关于CustNum字段 141
8.3创建Clients项目 143
8.4制作Exit按钮 144
8.5 在窗体中放置Table和DataSource组件以及DBGrid控件 145
8.6 在窗体中放置DBText控件 146
8.7 FormCreate过程 147
8.8在顶部的Panel中放置Navigator控件 147
8.9其他的外观装饰 147
8.10 在窗体中放置DBEdit控件 149
8.11考虑用户界面 151
8.1 2制作窗体frmClients的插入记录按钮 152
8.1 3表排序 154
8.14 LastName字段的次级索引 155
8.15 为单选按钮的OnClick事件添加代码 155
8.16添查找按钮 156
8.18 问与答 158
8.17小结 158
8.19 测验 159
8.20 练习 159
8.21测验答案 159
8.22练习答案 159
第9天查找和列表 161
9.1列表和查找表 161
9.2 MyList程序 161
9.3创建MyList项目 162
9.4 在窗体中放置DBEdit控件 163
9.7实现Exit按钮 164
9.6 FormCreate过程 164
9.5 在窗体中放置DBText控件 164
9.8 为ClientType字段放置DBText控件 165
9.9在窗体中放置DBComboBox控件 165
9.10在DBComboBox中添加列表项 167
9.11 查找表 169
9.12实现MyLookup程序 171
9.13 FormCreate过程的代码 172
9.14 为Exit按钮的OnClick事件添加代码 172
9.15更新表Clients.DB的SalesPersonNun字段 173
9.16刷新（Refresh） 176
9.17增强MyLookup程序的功能 177
9.18 小结 178
9.20测验 179
9.19问与答 179
9.21 练习 180
9.22测验答案 180
9.23练习答案 180
第10天查询和设定范围 183
10.1 OnlyJim程序 183
10.2创建项目OnlyJim的窗体 183
10.3实现Exit按钮 184
10.4建立SQL查询 186
10.5什么是SQL语句 187
10.6 Query控件的RequestLive属性 187
10.7静态和动态查询 188
10.8在程序执行时激活查询或使查询不起作用 188
10.10 创建SetQuery项目 189
10.9 SetQuery程序 189
10.11 实现Exit按钮 190
10.12 FormCreate过程 190
10.13 定义SQL参数 191
10.14 运行期间修改SQL条件 192
10.15 设置记录范围 195
10.16 创建SetRange项目的窗体 196
10.17 实现Exit按钮 196
10.18 添加字段对象 197
10.19 实现Range按钮 197
10.20 小结 199
10.21 问与答 199
10.24测验答案 200
10.25练习答案 200
10.23 练习 200
10.22 测验 200
第11天多窗体和打印窗体 203
11.1建立多窗体项目的必要性 203
11.2创建AddView项目 204
11.3实现Exit对话框 205
11.4在项目中添加窗体 206
11.5在窗体中加入Close按钮 207
11.6显示Clients和Parts窗体 207
11.7显示非模式的窗体 209
11.8实现Clients窗体 210
11.9实现Parts窗体 211
11.10打印窗体 212
11.11创建书签 213
11.12小结 216
11.13问与答 216
11.14测验 217
11.15练习 217
11.16测验答案 217
11.17练习答案 217
第12天在Delphi中使用图形和备注 219
12.1 Graphics和Memo字段 219
12.2 创建FillAnim项目 219
12.3实现FillAnim程序窗体 220
12.5使用DBMemo和DBImage控件 221
12.4实现Exit按钮 221
12.6 DBMemo控件的AutoDisplay属性 223
12.7放置DBImage控件 224
12.8 DBImage控件的Stretch属性 225
12.9填充表Anim.DB 225
12.10创建MyAnim项目 226
12.11实现Exit按钮 230
12.12实现frmShow窗体 231
12.13完成动画演示 233
12.14使用Timer控件 235
12.15为Start按钮添加代码 238
12.16为Stop Show按钮编写代码 238
12.19测验 239
12.17小结 239
12.18问与答 239
12.20练习 240
12.21测验答案 240
12.22练习答案 240
第13天在Delphi程序中使用VBX和声音 242
13.1 声音功能 242
13.2通过扬声器播放声音 243
13.3创建Kennedy项目 244
13.4实现Exit按钮 244
13.5表Kennedy.DB 244
13.6在frmKennedy窗体中放置Image控件 246
13.7在frmKennedy窗体中放置Date控件 247
13.9 在frmKennedy窗体中放置DBText控件 248
13.8 为frmKennedy窗体的OnCreate事件添加代码 248
13.10什么是VBX控件 249
13.11安装VBX控件 250
13.12在frmKennedy窗体中放置Multimedia控件 251
13.13通过扬声器播放声音 251
13.14完成同步工作 252
13.15小结 256
13.16问与答 257
13.17测验 257
13.18练习 257
13.19测验答案 257
13.20练习答案 257
14.2创建MM项目 259
14.1 创建表MM.DB 259
第14天使用DeIphi编写多媒体数据库应用程序（1） 259
14.3 实现frmMM窗体的Exit按钮 260
14.4实现frmFillMM窗体 260
14.5 编辑表MM.DB 261
14.6使用DBRadioGroup控件 263
14.7完成frmShow窗体 266
14.8显示窗体frmShow 267
14.9在窗体frmShow中添加控件 267
14.10设置Radio按钮的属性 268
14.11 建立SQL语句（相应于单选按钮） 268
14.12定义参数DeviceName 269
14.13播放记录内容 270
14.17测验 272
14.16 问与答 272
14.14下一步要做什么 272
14.15 小结 272
14.18练习 273
14.19测验答案 273
14.20练习答案 273
第3周 浏 览 275
第15天 用Delphi编写多媒体数据库应用程序（2） 275
15.1动态SQL语句 275
15.2给Movie单选按钮的Click事件添加代码 276
15.3测试动态SQL语句 276
15.4播放电影 277
15.5增加字段对象 278
15.6设置Multimedia控件 279
15.7打开WAV进程 280
15.8给Movie单选按钮的OnClick事件添加代码 280
15.9给Navigator控件的OnClick事件添加代码 281
15.10实现MIDI功能 282
15.11设置SQL语句以选择MIDI记录 283
15.12实现PC Speaker（计算机扬声器）功能 284
15.13给Speaker单选按钮的OnClick事件添加代码 284
15.14小结 285
15.15问与答 285
15.16测验 285
15.17练习 285
15.19练习答案 286
15.18测验答案 286
第16天用Delphi制作三维虚拟现实 287
16.1什么是三维虚拟现实程序 287
16.2什么是三维虚拟现实VBX控件 287
16.3 My3DVR.EXE程序 288
16.4在VBX页中增加Tego3DVR.VBX控件 295
16.5 My3DVR程序的可视化实现 296
16.6给My3DVR程序准备地图文件（FLR文件） 297
16.7声明全局变量 300
16.8给Exit菜单项的OnClick事件添加代码 300
16.9给About菜单项的OnCliek事件添加代码 301
16.10给frmMy3DVR窗体的FormCreate()过程添加代码 301
16.12给frmMy3DVR窗体的OnKeyDown事件添加代码 308
16.11给frmMy3DVR窗体的OnPaint事件添加代码 308
16.13给frmMy3DVR窗体的OnMouseUp,OnMouseDown和OnMouseMove事件添加代码 311
16.14关于三维画面中的对象 313
16.15慢跑者和锻炼的妇女的动画 316
16.16增加SetCell()过程 318
16.17在程序执行过程中移动物体 319
16.18利用Delphi的数据库功能设计三维虚拟现实游戏 321
16.19小结 321
16.20问与答 321
16.21测验 322
16.22练习 322
16.23测验答案 322
16.24练习答案 322
17.2告诉ReportSmith数据存放的位置 323
第17天制作报表 323
17.1什么是报表 323
17.3生成第一个报表 325
17.4保存报表 328
17.5显示报表 328
17.6修改Client01.Rpt报表的版面 329
17.7把报表集成到Delphi程序中 331
17.8实现Exit按钮 331
17.9在窗体中放置一个TReport控件 332
17.10在窗体中放置一个Print Report按钮 332
17.15测验答案 334
17.14练习 334
17.13测验 334
17.12 问与答 334
17.11 小结 334
17.16练习答案 335
第18天制作多表报表 336
18.1 生成多表报表的必要性 336
18.2生成SalesP01.Rpt报表 337
18.3合并报表 338
18.4美化合并报表的外观 340
18.5删除报表中的列 342
18.6创建合并报表的另外一种方法 343
18.7创建表的链接 345
18.8给报表排序 348
18.9 分组 350
18.10小结 351
18.11 问与答 351
18.12测验 351
18.13练习 351
18.14 测验答案 351
18.15练习答案 351
第19天制作包含计算字段和其他内容的报表 355
19.1 加入计算字段的必要性 355
19.2指定报表中包含的记录 355
19.3给报表加上统计字段 357
19.4设置条件 359
19.5创建一个累加值字段 360
19.6创建一个平均值字段 362
19.7使用报表变量 362
19.8让用户通过列表设置报表变量 367
19.9从表中选择值 369
19.10小结 373
19.11 问与答 374
19.1 2测验 374
19.13练习 374
19.1 4测验答案 374
19.15练习答案 375
20.2 创建Items.DB-Part.DB表的合并表 376
20.3创建两个表之间的链接 376
20.1 派生字段 376
第20天报表的派生字段和派生列 376
20.4创建总价列 379
20.5宏派生字段 381
20.6 小结 387
20.7问与答 388
20.8测验 388
20.9练习 389
20.10测验答案 389
20.11练习答案 389
第21天其他报表格式 390
21.1制作交叉报表 390
21.2把列报表转换成交叉报表 393
21.3打印地址 397
21.4分离客户 399
21.5 在组的题头中放置客户的姓名和地址 402
21.6在组的主体中插入由别的表得到的列 404
21.7增加派生列 406
21.8在各个组的脚注区域插入统计字段 407
21.9在硬拷贝中分离各个组 408
21.10打印标签和制作格式报表 408
21.11 小结 409
21.12问与答 409
21.13测验 409
21.14练习 410
21.15测验答案 410
21.16练习答案 410