1、2014年 9月份考试 Delphi 程序设计语言第三次作业 一、单项选择题（本大题共 80分，共 20 小题，每小题 4 分） 1. 下面关于单元的初始化 Initialization 部分的说法哪一个是正确的？ ( ) A. 如果调用了 Initialization,必须调用 Finalization B. 该部分代码单元被其他单元或程序引用时就会自动运行 C. 这部分代码与单元中的 FormCreate 事件的作用是相同的 D. 初始化部分的代码只能在单元中有 OLE 和 COM对象时才有效 2. Windows 的消息系统中的消 息来源可分为： ( ) A. 硬件消息，应用程序消息 B
2、. 应用程序消息，硬件消息， Windows 系统的窗口管理消息 C. 用户自定意消息， Windows 系统的窗口管理消息、 D. 硬件消息， Windows 系统的窗口管理消息 3. 已知 Var a:arraya.e,1.4,boolean of real; 则数组 a中包含的元素的个数为 ( ) A. 5 B. 20 C. 40 D. 11 E. 22 4. Delphi6 的数据库引擎是哪个？ ( ) A. DAO B. ADO C. BDE D. D BA 5. TtreeView 加入了创建树节点的功能，它隶属于哪个单元文件？ ( ) A. Classes.pas B. ComC
3、trls.pas C. Controls.pas D. DbCtrls.pas 6. 关系数据库管理系统所管理的是什么？ ( ) A. 若干个表文件 B. 数据库文件所安放的地址 C. 若干个电子的表文件 D. 若干个二维表 7. 下面说法正确的是 ( ) A. Label 和 Edit 组件都可以用于用户输入数据组框（ GroupBox）组件和面板（ Panel） 组件都有 Caption 属性，都可在边框显示 Caption 标题内容。 B. 位图按钮（ BitBtn）组件与按钮（ Button）组件的主要区别是可以在位图按钮上同时显示文本信息和位图，而一般的按钮组件只能显示文本信息。 C
4、. 状态条组件一般放置在窗体的底部，用于显示应用程序的执行状态及相关的提示信息，状态条无法划分多个区域，所以只能显示一条信息 8. 已知 Var f:file of integer;则 f所代表的文件是 ( ) A. ASCII 码文件 B. 二进制文件 C. 文本文件 D. 存放整数的文本文件 E. HTML 文件 9. 下面关于数据集 BookMark 的说法那个是正确的？ ( ) A. BookMark 类型的变量是一个对象指针，需要用 BookMark Create 来建立 B. BookMark，用 BookMark.free 来释放 C. BookMark 本质上是一条记录类型，无
5、须建立和释放 D. Delphi 中，一个数据集组件只能建立一个书签 BookMark 10. 帮助文件可以用什么工具编译而成？ ( ) A. MicrosoftWord B. MicrosoftHelpWorkshop C. MicrosoftWinHelp D. DelphiHelpTools 11. 在 Delphi 中绘图，直线应该用什么方法绘制？ ( ) A. SetBrushStyle B. BeeLine C. LineTo D. Ellipse 12. 集合表达式 1， 2， 3+4， 5， 6， 1， 2的值为 ( ) A. 1,2,3,4,5,6,1,2 B. 1,2,3
6、C. 4,5,6,1,2 D. 1,2,3,4,5 13. 一个 Delphi 窗体 Form1 中包含了一个 Tbutton 类的 Button1 控件，下面代码，将产生怎样的结果？ Tform1.button1Click(Sender); begin Self.Caption:=self; Self.Color:=ClBlue; EventX(Sender); end; Tform1.EventX(Sender:TObject); begin Sender.Tag:=10; end; ( ) A. 窗体的标题为 Self，颜色为蓝色，窗体的 Tag 属性等于 10 B. Button1 的
7、标题为 Self，颜色为蓝色， Tag属性等于 10 C. Button1 的标题 为 Self，颜色为蓝色，窗体的 Tag属性等于 10 D. 窗体的标题为 Self，颜色为蓝色， Button 的 Tag 属性等于 10 14. 注册一个自定义组件语句的用法是： ( ) A. RegisterComponents(TMyComponent,Standard) B. Register(TMyComponent,Standard) C. RegisterComponents(Standard,TMyComponent) D. Register(Standard,TMyCompone nt) 1
8、5. 某函数如下： Function check(n,k:Integer):Integer; Var m:Integer; Begin Repeat m:=n mod 10; n:=n div 10; K:=k-1 Until k=0; Check:=m End; 若调用语句 y:=check(3725,3),运行后 y值为 ( ) A. 7 B. 5 C. 2 D. 0 16. 请判断下列代码在程序关闭时，正确的对象释放顺序 ( ) TMybutton=class(Tbutton) Protected Destructor Destroy;override; End; . destructo
9、r TMyButton.Destroy; Begin inherited; Application.MessageBox(PChar(Name),Destroy,mb_ok); end; var AButton,BButton:TMyButton; procedure TForm1.FormCreate(Sender:TObject); begin Abutton:=TmyButton.Create(Nil); With AButton do begin Parent:=form1; Top:=100; Left:=100; Visible:=True; Name:=ABtn; end; BB
10、utton:=TMyButton.Create(Application); With BButton do begin Parent:=Form1; Top:=100; Left:=200; Visible:=True; Name:=BBtn; end; procedure TForm1.FormDestroy(Sender:TObject); begin end; A. BButton.Destroy-Form1.Destroy-AButton.Destroy B. 上述都不对，应该手工调用 Abutton.free，否则会造成 AButton 没有释放的错误 C. Form1.Destro
11、y-AButton.Destroy-BButton.Destroy D. AButton.Destroy-Form1.Destroy-BButton.Destroy 17. 设有关系框架 R(A,B,C,D)及 其上的函数相关性集合 BA,BCD, 那么关系框架最高是哪种范式？ ( ) A. 第一范式 B. 第二范式 C. 第三范式 D. BCNF 范式 18. 用树型结构表示实体类型及实体间联系的数据模型称为什么模型？ ( ) A. 关系模型 B. 网状模型 C. 层次模型 D. 概念数据模型 19. 下列函数头合法的是 ( ) A. function total(x:real); B. p
12、rocedure ab(a,b:real):real; C. procedure sum; D. function f(var f:real):integer; E. procedure FontListBoxKeyDown(Sender: TObject; var Key: Word;?Shift: TShiftState;); 20. 在设计一个 MDI 应用程序时，假设主窗体的 Name 是 MainForm，而子窗体的定义是 Child:TChildForm，那么应该采取下面哪种方法来生成子窗体？ ( ) A. Child:=TChildForm.Create(Nil) B. Chil
13、d:=TChildForm.Create(TApplication) C. Child:=TChildForm.Create(MainForm) D. Child:=TChildForm.Create(TMainform) 二、判断题（本大题共 20 分，共 10 小题，每小题 2 分） 1. 在对文件的操作中， reset 是打开一个老文件 ( ) 2. Object-Oriented Analysis 是指面向对象的分析 ( ) 3. 当 DragMode 置为 dmNanual 时，拖动不需要调用组件的 BeginDrag 方法就可以开始 ( ) 4. FindKey 方法和 GotoK
14、ey 方法的根本区别在于查找值要作为参数传递给GotoKey 函数。 ( ) 5. Delphi 可以象其它开发工具一样使用传统的资源，比如菜单可以作为资源加载，以利于实现多国语言环境。 ( ) 6. Quick Report 组件用于产生报表，它只有一个组件。 ( ) 7. 数组和记录结构两者既可以存储同一类型的数据，也可以存储不同类型的数据 ( ) 8. 在一个项目中，第一个建立的窗体就是主窗体 ( ) 9. 运行出错是指程序能正常编译但在运行时出错。比如说在除法计算时除数为0，此时操作系统一般会自动 终止应用程序的执行 ( ) 10. 在 Delphi 程序运行时动态设置属性的一般格式是： . := ;( ) 答案： 一、单项选择题（ 80分，共 20 题，每小题 4 分） 1. B 2. B 3. C 4. C 5. B 6. D 7. C 8. D 9. A 10. B 11. C 12. A 13. D 14. C 15. A 16. B 17. A 18. C 19. C 20. A 二、判断题（ 20 分，共 10 题，每小题 2 分） 1. 2. 3. 4. 5. 6. 7. 8. 9. 10.
