国开《Delphi程序设计》阶段测验3（第4-5章，权重25%）

一、选择题（共20道，每道3分）

1．调用主窗体的哪个方法，可以结束程序。

Name

Clear

Close

End

2．有关窗体的Close 方法和Destroy 方法描述正确的是：（  ）。

Close 方法和Destroy 方法的作用相同。

Close 方法是关闭窗体并且释放窗体。

Destroy 方法是关闭窗体并且不释放窗体。

Close 方法仅用来关闭窗体，Destroy 方法是用来释放窗体对象实例。

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

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

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

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

函数在被调用时，能执行某种特殊功能并能返回到调用它的地方，并且不能指定传递参数。

4．某函数如下：

Function check(n,k:Integer):Integer;
Var m:Integer;
Begin
m:=n mod 10;
n:=n div 10;
Check:=m
End;
若调用语句y:=check(32,4),运行后y值为：（ ）

3

4

2

0

5．已知函数如下： function f(n:integer):integer; begin if n=0 then f:=0 else if n>0 then f:=n -2 else f:=n+3 end; 则调用f(-5)的值是( )。

0

1

-2

3

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

&

$

%

@

7．工具栏上的一个SpeedButton按钮如果要设置为状态按钮，则正确设置的方法是（  ）。

将SpeedButton按钮的GroupIndex属性设置为0，且AllowAllUp属性设置为True。

将SpeedButton按钮的GroupIndex属性设置为0，且AllowAllUp属性设置为False。

将SpeedButton按钮的GroupIndex属性设置为非0值，且AllowAllUp属性设置为True。

将SpeedButton按钮的GroupIndex属性设置为非0值，且AllowAllUp属性设置为False。

8．工具栏上的一组按钮如果要构成互斥关系（如“左对齐”、“居中”、“右对齐”），它们的GroupIndex属性正确的设置是（   ）

GroupIndex属性值都为0

GroupIndex属性值非0，且互不相同

GroupIndex属性值非0，且相同

GroupIndex属性值互不相同

9．以下叙述中错误的是（    ）

一个项目包含不止一种类型的文件。

窗体的Show方法的作用是显示该窗体。

窗体的Hide方法和Release方法的作用完全相同。

若项目文件中有多个窗体，可以根据需要指定一个窗体为主窗体。

10．在窗体上建立多页面的用户界面，需要首先建立的对象是（     ）

TabControl

PageScroller

HeaderControl

PageControl

11．下面哪个文件不是音频/视频文件：（   ）。

WAV文件

AVI文件

BMP文件

MIDI文件

12．下面哪个组件不是Delphi中常用的多媒体组件：（   ）。

QuickReport组件

Image组件

Animate组件

MediaPlayer组件

13．利用Canvas对象的MoveTo和 哪个绘图方法，可以绘制一条直线。

LineTo

LN

Grid

Draw

14．在Delphi 图形编程中，最常用到的图形对象就是：（ ）

TCanvas

TBitmap

Tpicture

Ticon

15．Image组件可通过设置其哪一个属性为True使Image组件根据图像的大小自动调整显示窗口大小。

AutoSize

Name

Grid

DB

16．下列有关mediaPlayer 组件方法说法不正确的是：（ ）。

该组件的Open 方法用于打开多媒体设备。

该组件的Pause 方法用于暂停多媒体设备的播放或录制。

在调用该组件的Open 方法打开多媒体设备之前，须在DeviceType 属性中指定设备类型。

该组件的Step 方法用于中止媒体播放或录制。

17．通过Animate对象的哪个属性设置，可以指定系统标准的AVI动画演示。

CommonAVI

Image

Grid

DB

18．Delphi中可以实现绘制直线的方法是 （    ）

Polyline

Ellipse

Rect

LineTo

19．利用Image对象的哪个属性设置，可以使加载的图像自动放大或缩小，以适应Image的显示区域（ ）

Stretch

AutoSize

Align

Center

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

Image

Picture

Grid

Load

二、判断题（共10道，每道3分）

21．在某个菜单项的“Caption”属性中填入一个字符“：”,则在该菜单项位置会程序一个菜单列表中的分隔线。

对

错

22．在MDI应用程序窗口中，如果将一个窗体设为父穷窗体，要将它的FormStyle属性设为FsStayOnTop。

对

错

23．Delphi中的菜单项有3种类型：普通按钮型、复选框型和单选按钮型。

对

错

24．如果要在窗体上设计一个主菜单，首先要建立MainMenu对象。

对

错

25．在一个项目中，第一个建立的窗体并不一定就是主窗体，可以在后续开发过程中指定。

对

错

26．图形组件没有输入焦点，但是可以在运行时接受用户的输入，然后显示用户输入的图片。

对

错

27．利用Image对象的Stretch属性设置，可以使Image对象的显示区域随着调入图像的大小自动调整以显示全图。

对

错

28．MediaPlayer控件的AutoEnable属性是用来控制该控件是否可用。

对

错

29．图形组件可以输入焦点，并能接受用户的输入，然后显示。

对

错

30．MediaPlayer组件可以播放 Avi、midi等多种媒体格式。

对

错

三、程序阅读题（共1道，每道10分）

31．

程序设计界面如下，请阅读程序写出结果：

  

程序界面

在form1上建立的对象有：Label1~Label2、Edit1（输入数）、Edit2（输出序列）、Button1（确定）等。

Button1按钮的处理程序如下：

procedure TForm1.Button1Click(Sender: TObject);

var

  i, j: Integer;

begin

  Edit2.Text := \’\’;

  j := StrToInt(Edit1.Text);

  for i := 1 to j do

    Edit2.Text := Edit2.Text + IntToStr(i);

end;

 

当用户在Edit1（输入数）中输入一个1位正整数数值n，然后按“确定”按钮，在Edit2（输出序列）显示结果为        。

从0到这个正整数n的序列数

从1到这个正整数n的序列数

从1到这个正整数n的和

从0到这个正整数的和