Delphi程序设计-期末考试试卷和答案

Delphi 程序设计-期末考试试卷和答案

装

订 线

一、单选题（每小题2分，共30分）

1．在 RadioGroup 组件中有 4 个单选框，当选中第 2 个单选框时， RadioGroup 组件中的 ItemIndex 属性值应为 （ B ）。

A ．0

B ．1

C ．2

D ．3 2．函数和过程的区别为（ A ）。

A ．函数执行后返回一个值，而过程不需返回值

B ．过程执行后返回一个值，而函数不需返回值

C ．过程在被调用时，能执行某种特殊功能并能返回到调用它的地方

D ．函数在被调用时，能执行某种特殊功能并能返回到调用它的地方 3．32 AND 27 的值是（ B ）。

A ．59

B ．0

C ．27

D ．32 4．窗体与数据模块的扩展名是（ B ）。

A ．.dcu

B ．.dfm

C ．.pas

D ．.dpr 5．Delphi 中用什么函数来析构一个组件（ C ）。

A ．Constructor

B ．Destroy

C ．Free

D ．Create 6．一个指针变量 ptr 的域成员 fs 访问的方法是（ C ）。 A ．ptr->fs B ．ptr.fs C ．ptr^fs D ．ptr@fs

7．Type aarrays=[1…8,1…5] of integer ，该类型定义了多少个下标元素（ D ）。 A ．45 B ．54 C ．48 D ．40 8．Delphi 的所有类都是从什么类继承下来的（ B ）。 A ．Tcomponent B ．Tobject C ．Tstream D ．Tnull

9．定义构造函数时用到的保留字是（ C ）。

A ．Class

B ．.implementation

C ．create

D ．construction 10．下列组件中属于可视组件的是哪一个（ D ）。

A ．Tdatasource

B ．Topendialog

C ．Ttable

D ．Tscrollbar

11．设有过程 procedure pro(V AR x,y:integer); 变量 a , b 为整型变量，其值分别为 5、6，则合法的过程调用语句是（ D ）。

A ．Pro(5,6)

B ．pro(5,b)

C ．pro(a,6)

D ．pro(a,b) 12．下列组件中不能获取焦点的是（ B ）。

A ．Tedit

B ．Tlabel

C ． Trichedit

D ．Ttreeview 13．定义抽象类必须使用的指令字是（ A ）。

A ．Abstract

B ．virtual

C ．dynamic

D ．override ” 14．Delphi 是哪个公司的产品（ C ）。

A ． Microsoft

B ．IBM

C ．Borland

D ．DOM

15．窗体上放置有一个TEdit 类控件Edit1，当在Edit1中按下‘A ’键时触发的事件和事件顺序是（ A ）。

A ．OnKeyDown->OnKeyPress->OnKeyUp

B ．OnKeyDown->OnKeyUp

C ．OnKeyPress

D ．OnKeyDown->OnKeyUp->OnKeyPress 二、判断题（每小题1分，共10分）

1．Pascal 语言中可以把一个实数赋值给一个整型变量，系统会自动取整。（ 错 ） 2．所有类都有Name 属性。（ 错 ）

3．variant 类型的变量被动态赋值为一个特定的数据类型后，不能再赋值为一个其它的数据类型。（ 错 ）

4．函数MessageDlgPos 与MessageDlg 极为相似，只是MessageDlgPos 函数能够控制信息对话框的出现位置。（ 对 ） 5．BitBtn 控件可以用来制作一个带图片的按钮，而SpeedButton 则不能。（ 错 ） 6．MediaPlayer 控件的AutoEnable 属性是用来控制该控件是否可用。（ 错 ）

7．图形组件没有输入焦点，不能接受用户的输入，它只具有向用户显示的功能。（ 对 ）

8．Timer 组件常称为“定时器”，它每隔固定的时间间隔可以触发一个OnTimer 事件。（ 对 ） 9．Tobject 是delphi 的基类，系统中的每一个类都是Tobject 的子类。（ 对 ）

10．在MDI 应用程序窗口中，如果将一个窗体设为父穷窗体，要将它的FormStyle 属性设为FsStayOnTop 。（ 错 ） 三、填空题（每空2分，共20分）

1．用于建立菜单项的下划线快捷方式的字符是 & 。

2．在设计阶段，利用Image 对象的 picture 属性，可以加载一幅图片。 3．所有可视化的VCL 控件都是从 TControl 基类派生而来的。

4．Delphi 有三种控制循环的语句： repeat 语句， while 语句， for 语句。 5．Delphi 支持3种类型的注释： {} 注释， (* *) 注释， // 注释。 6．关闭文件需要使用 closefile () 函数。 四、简答题（共20分） 1．简述什么是对象和类。（4分）

在面向对象的程序分析和设计技术中，“类”就是对具有相同属性和相同操作的一组相似对象的定义。 从另一个角度来看，对象就是类的一个实例。

2．简述程序错误的类型有哪些。（4分） （1）设计期错误 （2）编译期错误 （3）运行期错误 （4）逻辑错误

3．根据下列代码，请回答。（12分） Program Infoproc Uses Forms,

Unit1 in ‘Unit1.pas ’{formInfoInput}, Unit2 in ‘Unit2.pas ’{formInfoShow}; {$R *.res} Begin …… End.

问题1：以上代码是 项目/工程文 件的组成部分。

问题2：根据以上代码，可知项目文件名是 Infoproc ，该项目文件包含2个单元文件，文件名分别是 Unit1 、 Unit2 ，它们对应的窗体名是formInfoInpu 、 f ormInfoShow 。 五、程序题（每小题10分，共20分）

1．定义一个函数F ，其返回值为1~N 的和。(每空2分) （ function ）F （n:integer ）; Var I,s:integer; Begin

For i:=( 1 ) to ( N ) S:=( S+i ); ( n ):=s; End;

2．在窗体上面绘制出一条规则的余弦曲线，使其尺寸约为窗体的80%，写出编程步骤与代码。

Procedure TForm1.FormPaint(sender:Tobject); var x,y:real; j,j,h:integer; begin

h:=form1.Height div 2; for i:=0 to form1.Width do begin

x:=i*(2*3.14/form1.Height); y:=cos(x);

j:=trunc(0.8*y*h)+h; canvas.Pixels[i,j]:=clRed: end; end;