delphi程序试题答案

一、单选题

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．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。（错）

三、填空题

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

2．在设计阶段，利用Image对象的 picture 属性，可以加载一幅图片。

3．所有可视化的VCL控件都是从 TControl 基类派生而来的。

4．Delphi有三种控制循环的语句： repeat 语句， while 语句， for 语句。5．Delphi支持3种类型的注释：{}注释，(* *)注释，//注释。

6．关闭文件需要使用closefile ()函数。

四、简答题

1．简述什么是对象和类。

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

从另一个角度来看，对象就是类的一个实例。

2．简述程序错误的类型有哪些。

（1）设计期错误

（2）编译期错误

（3）运行期错误

（4）逻辑错误

3．根据下列代码，请回答。

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 。

五、程序题

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;