电大《Delphi程序设计》形考任务题库

电大《Delphi程序设计》形考任务题库

题目1.对于下面的条件表达式:((3 <;= x)AND (x <; 0)) OR (x in [1..10]) 当x = 3 时, 该表达式的值为: A. TRUE B. FALSE C. x D. 都不对 题目2.Delphi 的所有类都是从什么类继承下来的()。 A. Tcomponent B. Tobject C. Tstream D. Tnull 题目3.窗体与数据模块的扩展名是()。 A. .dcu B. .dfm C. .pas D. .dpr 题目4.设a是布尔变量,其它是整型变量,下面正确的赋值语句是() A. x=y div 7 B. a =x+y C. x :=y mod z +3 D. x+y:=z +2 题目5.下列类型中合法的是()。 A. TYPE a=10..10; B. TYPE b=10..5; C. TYPE c=0..SQRT(10); D. TYPE d=1..20; 题目6.3>;2 AND FALSE 的结果是:()。

A. 3

B. 2

C. FALSE

D. TRUE

题目7.Delphi的一个项目由若干文件组成,其中与窗体文件对应的文件是()。

A. 单元文件

B. 以“.~”为后缀名的文件

C. 以“.grd”为后缀名的文件

D. 以上都不对

题目8.Delphi的一个项目由若干文件组成,其中主程序文件的默认名是:()

A. project1.dpr

B. project1.~

C. project1.p

D. project1.pas

题目9.Delphi没有用到的文件类型有()。

A. .frm

B. .pas

C. .dfm

D. .dpr

题目10.Delphi的一个项目由若干文件组成,其中文件名后缀含有“~”的文件是:()

A. 代码文件

B. 临时文件

C. 无用文件

D. 备份文件

题目11.Delphi应用程序中单元文件的扩展名是:()

A. *.pas

B. *.uit

C. *.u

D. *.~

题目12.Delphi应用程序中项目文件的扩展名是*.()。

A. dpr

B. pas

C. Grd

D. db

题目13.表达式round(4.2) mod trunc(2.8)的值是()。

A. 0

B. 1

C. 2

D. 3

题目14.结构化程序设计中,对于程序中采用的三种控制结构,要求每种结构只能有()个入口和一个出口。

A. 一

B. 二

C. 三

D. 四

题目15.如果让界面上的一个按钮变为不可用,需要将它的哪一个属性设为False。

A. Close

B. Enabled

C. Grid

D. See

题目16.设a、x、y、z等都是整型变量,下面正确的赋值语句是() 。

A. x=y div 7

B. x+y=a

C. x :=y mod z

D. x+y:=z

题目17.设n为整型变量,且已赋值为1898,表达式(n mod 100) div 10表示:()。

A. 分离出个位数字

B. 分离出十位数字

C. 分离出百位数字

D. 分离出千位数字

题目18.调试程序时,需要执行执行点所在的源代码行,并停留在下一个源代码行。可通过()菜单项进行。

A. Run

B. Step Over

C. Trace Into

D. Trace To Next Source Line

题目19.下列常量定义合法的是()

A. CONST width=7;

B. CONST case=\'7\';

C. CONST 1A=7.9;

D. CONST century=year div 100;

题目20.下面的函数引用将返回字符串“笔记本电脑100台!”的是:()。

A. format(‘%s电脑%d台!’,[‘笔记本’,100])

B. format(‘%s电脑%d台!’,[100 ,‘笔记本’])

C. format(‘电脑%s %d台!’,[‘笔记本’,100])

D. format(‘%d电脑%s台!’,[‘笔记本’,100])

题目21.粘贴时,如果作为容器的组件已被选择,剪贴板中的组件会当作容器组件的子组件来粘贴。

A. 对B. 错

题目22. ((x>;=5) OR (x<;=-5) ) AND (x in [1..9] ) 当x=10时,表达式的值为真(或true)

A. 对B. 错

题目23.Delphi菜单中的“Run Into Cursor”菜单项,用于调试程序时,执行执行点所在的源代码行,并停留在下一个源代码行。

A. 对B. 错

题目24.Delphi是面向对象的可视化的开发环境,编程语言采用Object C。

A. 对B. 错

题目25.大多数组件的属性可以在运行时改变,而且,有些只能在运行时刻改变。

A. 对B. 错

题目26.结构化程序设计要求程序中仅采用顺序、分支2种控制结构,其中每种结构只能有一个入口和二个出口。

A. 对B. 错

题目27.同一类的不同对象如何区分,主要通过对象的属性的不同属性取值来区分。

A. 对B. 错

题目28.Pascal 语言中可以把一个实数赋值给一个整型变量,系统会自动取整。

A. 对B. 错

题目29.对象具有属性和方法,这是对象的主要特征。

A. 对B. 错

题目30.一个对象可以具有多个属性,但只能有一个方法。

A. 对B. 错

题目31.阅读下面的程序段,其中edit1~edit3均为编辑框组件,当 s 为 3 ,edit1输入数字9 , edit2输入数字3的时候,执行下面的程序段,请选择edit3应显示的内容为。

var

x,y,z,s :integer;

begin

x:= strtoint(edit1.Text);

y:= strtoint(edit2.Text);

case s of

0: z:= x+y ;

1: z:= x-y ;

2: z:= x*y ;

3: z:= x div y;

end;

edit3.text:=inttostr(z);

if s=3 then

if (x mod y<;>;0)then

edit3.text:=Edit3.text+' --- '+ inttostr(x mod y) ;

end;

执行后,edit3显示的内容为:

A. 3

B. 2

C. 1

D. 0

题目1.能够删除edit1中内容的语句是()。

A. edit1.Clear ;

B. edit1. Focused ;

C. edit1.Text= null ;

D. edit1.text :='\0' ;

题目2.一个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的标题为Self,颜色为蓝色,Tag属性等于10

C. Button1的标题为Self,颜色为蓝色,窗体的Tag属性等于10

D. 窗体的标题为Self,颜色为蓝色,Button的Tag属性等于10

题目3.以下那个组件在程序运行时不可以由用户输入编辑文本()。

A. Edit

B. comboBox

C. MaskEdit

D. label

题目4.用于异常处理的关键字不包括()。

A. try

B. except

C. finally

D. error

题目5.RadioGroup对象中的单选按钮个数及名称是通过哪个属性来进行设置的。

A. Name

B. Caption

C. IT

D. Items

题目6.窗体表单上放置有一个Edit类控件Edit1,当在Edit1中按下‘A’键时触发的事件和事件顺序是()。

A. OnKeyDown->;OnKeyPress->;OnKeyUp

B. OnKeyDown->;OnKeyUp

C. OnKeyPress

D. OnKeyDown->;OnKeyUp->;OnKeyPress

题目7.下面的语句是用来判断用户选择RadioGroup组件的第几个选项按钮:

if RadioGroup1.ItemIndex=6 then …

A. 5

B. 6

C. 7

D. 8

题目8.为了使计时器控件Timer1每隔0.5秒就触发一次事件并执行事件代码,应将Timer1控件的Interval属性设置为:()。

A. 500

B. 50

C. 5

D. 0.5

题目9.下面的语句用来在Memo组件的第2行位置插入“在第二行显示”字样的文本,请补充完整:

memo2.lines.Insert(____,'在第二行显示');

A. 0

B. 1

C. 2

D. -1

题目10.如果让界面上的一个按钮在运行的时候变为不可见,需要将它的哪一个属性设为False。

A. Visible

B. Name

C. Enable

D. See

题目11.数组类型定义:

Type aarrays=[1…8,1…5] of integer ;

该数组类型包含了多少个整型元素()。

A. 5

B. 8

C. 48

D. 40

题目12.集合类型的数据大小取值范围是:()。

A. 0..255

B. 0..65535

C. 0..63

D. 0..31

题目13.标准对话框组件中的OpenDialog组件需要执行哪个方法,会弹出常用的“打开文件对话框”。

A. Message

B. Close

C. Execute

D. Show

题目14.假如 C 盘存在aa.txt 文件,则有关下列代码理解不正确的是:()

var

FileVar: file;

begin

AssignFile(FileVar, 'c:\aa.txt'); //语句1

Reset(FileVar); //语句2

CloseFile(FileVar); //语句3

CloseFile(FileVar); //语句4

end;

A. 语句1 是与外部文件建立联系

B. 语句2 是以读方式打开文件

C. 语句3 不会引发异常

D. 语句4 正常关闭文件不会引发异常

题目15. 使用ReWrite 函数可以以什么方式打开一个已存在的文本文件或创建一个新的文本文件?()

A. 只读方式

B. 写入方式

C. 追加方式

D. 插入方式

题目16.时钟组件(Timer)能有规律的以一定时间间隔触发哪个事件。

A. Columns

B. OnTimer

C. Grid

D. DoTime

题目17.Timer控件的常用事件是(),当此控件跨过时间间隔时发生。

A. Ontimer

B. POST

C. APPEND

D. IntervalTime

题目18.MessageBox函数与MessageDlg函数的相同之处在于()。

A. 所有参数都相同。

B. 都没法指定显示不同的图形符号。

C. 都可以显示多个按钮,也可以指定显示不同的图形符号。

D. 以上都不对。

题目19.进度显示组件ProgressBar的当前进度可以通过()属性设置。

A. Step

B. Scroll

C. Position

D. Max

题目20.ListBox对象列表框中的内容是通过哪个属性来进行设置的。

A. Columns

B. Name

C. Grid

D. Items

题目21.根据需要可以响应任何组件的事件。

A. 对B. 错

题目22.BitBtn控件和speedButton控件都可以用来制作一个带图片的按钮。

A. 对B. 错

题目23.容器组件是指可以放置其他组件的组件,GroupBox是容器组件。

A. 对B. 错

题目24.在由Delphi 管理的窗体类声明段中加进任何代码都会引起程序出错。

A. 对B. 错

题目25.对象的Name属性值可以为空。

A. 对B. 错

题目26.数组类型定义:

Type aarrays=[1…8,1…5] of integer ;

该数组类型包含了48个整型元素。

A. 对B. 错

题目27.Timer组件常称为“定时器”,它每隔固定的时间间隔可以触发一个OnSubmit事件。

A. 对B. 错

题目28.函数MessageDlgPos与MessageDlg极为相似,只是MessageDlgPos函数能够控制信息对话框的出现位置。

A. 对B. 错

题目29.一个数组中的各元素的数据类型可以不同。

A. 对B. 错

题目30.若已在窗体中加入了一个OpenDialog对象,要求在运行时,打开对话框时只显示扩展名为TXT的文件,则对通用对话框的Filter的属性进行设置,设置可以是: 'TXT Files|*.TXT'。

A. 对B. 错

题目31.本程序设计界面如下图所示:

procedure TForm1.Button1Click(Sender: TObject); //“计算”按钮

var

i , n, sum : integer ;

begin

sum := 0 ;

i := 1 ;

n := StrToInt(edit1.Text); //读入正整数n

while i <;=n do //循环语句

begin

if odd(i ) then sum :=sum+i;

i := i +1 ;

end;

edit2.Text :=IntToStr(sum ); //将结果在编辑框中显示

end;

用户在edit1中输入一个正整数7,则在edit2中显示计算结果为:

选项: A.7

A. 7

B. 14

C. 16

D. 21

题目1.调用主窗体的哪个方法,可以结束程序。

A. Name

B. Clear

C. Close

D. End

题目2.有关窗体的Close 方法和Destroy 方法描述正确的是:()。

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

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

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

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

题目3.函数和过程的区别为()。

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

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

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

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

题目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值为:()

A. 3

B. 4

C. 2

D. 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)的值是()。

A. 0

B. 1

C. -2

D. 3

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

A. &;

B. $

C. %

D. @

题目7.工具栏上的一个SpeedButton按钮如果要设置为状态按钮,则正确设置的方法是()。

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

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

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

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

题目8.工具栏上的一组按钮如果要构成互斥关系(如“左对齐”、“居中”、“右对齐”),它们的GroupIndex属性正确的设置是()

A. GroupIndex属性值都为0

B. GroupIndex属性值非0,且互不相同

C. GroupIndex属性值非0,且相同

D. GroupIndex属性值互不相同

题目9.以下叙述中错误的是()

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

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

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

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

题目10.在窗体上建立多页面的用户界面,需要首先建立的对象是()

A. TabControl

B. PageScroller

C. HeaderControl

D. PageControl

题目11.下面哪个文件不是音频/视频文件:()。

A. WAV文件

B. AVI文件

C. BMP文件

D. MIDI文件

题目12.下面哪个组件不是Delphi中常用的多媒体组件:()。

A. QuickReport组件

B. Image组件

C. Animate组件

D. MediaPlayer组件

题目13.利用Canvas对象的MoveTo和 哪个绘图方法,可以绘制一条直线。

A. LineTo

B. LN

C. Grid

D. Draw

题目14.在Delphi 图形编程中,最常用到的图形对象就是:()

A. TCanvas

B. TBitmap

C. Tpicture

D. Ticon

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

A. AutoSize

B. Name

C. Grid

D. DB

题目16.下列有关mediaPlayer 组件方法说法不正确的是:()。

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

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

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

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

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

A. CommonAVI

B. Image

C. Grid

D. DB

题目18.Delphi中可以实现绘制直线的方法是 ()

A. Polyline

B. Ellipse

C. Rect

D. LineTo

题目19.利用Image对象的哪个属性设置,可以使加载的图像自动放大或缩小,以适应Image的显示区域()

A. Stretch

B. AutoSize

C. Align

D. Center

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

A. Image

B. Picture

C. Grid

D. Load

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

A. 对B. 错

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

A. 对B. 错

题目23.Delphi中的菜单项有3种类型:普通按钮型、复选框型和单选按钮型。

A. 对B. 错

题目24.如果要在窗体上设计一个主菜单,首先要建立MainMenu对象。

A. 对B. 错

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

A. 对B. 错

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

A. 对B. 错

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

A. 对B. 错

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

A. 对B. 错

题目29.图形组件可以输入焦点,并能接受用户的输入,然后显示。

A. 对B. 错

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

A. 对B. 错

题目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(输出序列)显示结果为 。

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

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

C. 从1到这个正整数n的和

D. 从0到这个正整数的和

题目1.Delphi 程序与数据库之间进行数据交换一般要由多个数据库组件协作完成。如果用户要查询数据库中的一条信息,该指令通过用户界面组件发出,经数据源组件到达数据集组件。数据集组件与数据库建立连接,并读取数据库中的数据,而后又经过##组件将数据送到用户界面组件中显示。

A. 数据库连接

B. 数据源

C. 数据集

D. 数据

题目2. 下列哪一个数据库库引擎不仅可以连接Access,它还是一个通用的桌面数据库引擎。()

A. ADO

B. JET

C. BDE

D. ORACLE

题目3.下面的数据库组件中,哪个是可视组件,即其运行时可以出现在用户界面上:()

A. Database

B. Table

C. DataSource

D. DBEdit

题目4.Query组件没有Table组件的哪一样属性。()

A. DataSource

B. TableName

C. Name

D. Database

题目5.当Query对象中存储一条Update语句时,执行该语句需要调用Query的哪个方法。

A. ExecSQL

B. Clear

C. DO

D. DONE

题目6.利用DBGrid的哪个属性,可以设置DBGrid每一列的标题和对齐方式等。

A. Columns

B. Name

C. Grid

D. DB

题目7.以下哪个说法正确:

A. DBNavigator、DBText、DBGrid都不属于数据感知控件。

B. 每个数据感知控件都必须指定DataSource和DataField两个属性值。

C. DBNavigator和DBGrid组件设置其数据源DataSource属性为一个数据连接后就可以显示数据。

D. DBImage不属于数据感知控件。

题目8.DBGrid组件的设置中, 哪个属性的值指明了DBGrid组件中所显示数据的数据源的来源()。

A. databasename

B. dataset

C. Name

D. datasource

题目9.在table组件中用来说明当前数据集的来源的属性是()

A. active

B. tablename

C. databasename

D. name

题目10.Table组件的方法很多,其中都是用来浏览数据的方法的是()

A. next prior open

B. moveby last first

C. last prior close

D. setRangeStart last open

题目11.Table 控件操作时,方法()满足在数据表的末尾添加一条记录。

A. Insert

B. Append

C. Delete

D. Post

题目12.如果只能显示不能更改数据表中的数据,需要更改DBGrid控件的()属性。

A. ImeName

B. Colunms

C. ReadOnly

D. Front

题目13.下列有关主从表描述正确的是:()。

A. 主表主要是由数据集组件的MasterSource 和MasterFields 属性来完成。

B. 数据集的MasterSource 属性则是用来定义数据表之间的外键字段。

C. 数据集的MasterFields 属性用来指定主表的数据来源。

D. 任一数据集都不可以实现主从表。

题目14.打开的数据集通过BDE访问一个数据表Table,则调用Table的哪一个方法可以使记录指针指向table第一个记录。

A. No1

B. First

C. Next

D. End

题目15.只能输出、而不能输入的数据感知控件是()

A. DBEdit

B. DBText

C. DBRadioGroup

D. DBCheckBox

题目16.数据库组件中,提供了对数据库读写操作功能的核心组件是()

A. 数据源组件

B. 用户界面组件

C. 数据集组件

D. 数据感知控件

题目17.既可以通过选择输入、又可以直接输入的数据感知控件是()

A. DBRadioGroup

B. DBListBox

C. DBComboBox

D. DBCheckBox

题目18.下列常用的数据组件中,只需指定DataSource而不需指定DataField的控件是哪个?()

A. DBText

B. DBEdit

C. DBNavigator

D. Query

题目19.Delphi程序在对数据表中的数据修改后,用来提交数据的方法是()

A. Edit

B. Post

C. Upload

D. DownLoad

题目20.在Table组件中,用来设置打开或关闭与其相连的数据表的属性是()

A. ReadOnly

B. BOF和EOF

C. Keep

D. Active

题目21.数据访问组件包括Table、Query、datasource等组件。

A. 对B. 错

题目22.Table是利用SQL语句来访问数据库中数据表格的数据访问组件。

A. 对B. 错

题目23.ADO数据库库引擎不仅可以连接Access,它还是一个通用的桌面数据库引擎。

A. 对B. 错

题目24.要想在数据集中增加计算字段,必须先将数据集的字段全部置为动态字段。

A. 对B. 错

题目25.一个Query对象同一时刻可以无限制地存储多条SQL语句。

A. 对B. 错

题目26.在程序运行期间,一个Query对象中的SQL语句可以修改。

A. 对B. 错

题目27.在设计阶段,如果在Query对象的SQL语句中设置了参数,则必须在Query的Params属性中为参数设置数据类型。

A. 对B. 错

题目28.在Data Controls标签页上,只有DBNavigator组件可以不用指定DataField属性值。

A. 对B. 错

题目29.要想在数据集中增加查找字段,必须先将数据集的字段全部置为动态字段。

A. 对B. 错

题目30.建立永久字段的好处是:可以在设计阶段对字段对象进行设置,并可以增加新的字段(计算字段和查找字段)。

A. 对B. 错

题目31.本程序设计界面及运行界面如下:

在“盘数量”(Edit1)框中输入购买的光盘数,单击“计算”(Button1)按钮后在“应收金额”(Edit2)框中显示应收钱数。单击“结束”(Button2)按钮结束程序。

单击“计算”(Button1)按钮的事件处理程序如下:

procedure TForm1.Button1Click(Sender: TObject);

var

Disk, Money: Integer;

begin

Disk := StrToInt(Edit1.Text);

if Disk >;= 50 then

Money := 2 * Disk

else

Money := 3 * Disk;

Edit2.Text := IntToStr(Money);

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Close;

end;

当用户在Edit1(盘数量)中输入数量值70,然后按“确定”按钮,在Edit2(输出序列)显示结果为 。

A. 70

B. 140

C. 210

D. 50

★《布宫号》提醒您:民俗信仰仅供参考,请勿过度迷信!

本文经用户投稿或网站收集转载,如有侵权请联系本站。

发表评论

0条回复