文档库

最新最全的文档下载
当前位置:文档库 > Delphi期末考试试卷

Delphi期末考试试卷

汕头职业技术学院

2006-2007学年第一学期期末试卷(A)

课程名称Delphi 学分拟题人审题人

系(校区)班级姓名学号

题号 1 2 3 4 5 6 7 8 9 10 总分得分

一.选择题(每题2分,共3 0分).

1、以下标识符中哪个是合法的Delphi标识符?[ ]。

A.Delphi 7 B.Delphi.7 C._Delphi_7_ D.1st_class

2、下列对TADOQuery组件ADOQuery1的SQL属性正确操作的语句是[ ]

A.ADOQuery1.SQL.Clear:=’’;

B. ADOQuery1.SQL.Close;

C.ADOQuery1.SQL.Add:=’select * from table1’;

D.ADOQuery1.SQL.Text:=’select * from table1’;

3、[ ]组件没有Items属性。

A.TComboBox B. TListBox C. TMemo D. TRadioGroup

4、有序类型不包括以下的哪一个?[ ]

A.Real B. Integer C. Char D. Boolean

5、以下哪个组件是可视组件?[ ]

A.TDBGrid B.TADOQuery C.TDataSource D. TADOConnection

6、以下哪个不是关系型数据库?[ ]

A.Access B.ADO C.SQL Server D.Oracle

7、[ ]是一种提供访问各种数据类型的连接机制,是基于OLE-DB之上的技术,是微软提出的新标准,且力图

将它树为新的统一数据库接口.

A.DAO B. ODBC C. ADO D. BDE

8、以下哪个组件是通过SQL属性来获取数据的?[ ]

A.TDataSource B. TADOConnection C. TADOTable D. TADOQuery

9、ConnectionString属性是用于设置要连接的数据库的,以下哪个组件无该属性?[ ]

A.TDataSource B. TADOConnection C. TADOTable D. TADOQuery

10、要让菜单项的名字之前显示一个勾,应该设置菜单项的[ ]属性值为true。

A.Default B. Checked C. Enabled D. Visible

11、如果想在界面中直观地显示一些几何图形,就要用到TShape组件,以下[ ]属性用于设置它的形状。

A.Brush B. Pen C. Shape D. Name

12、设n为整型变量,且已赋值为1898,表达式(n mod 100) div 10表示:

A.分离出个位数字 B.分离出十位数字

C.分离出百位数字 D.分离出千位数字

13、设有如下程序段:

i :=1;

repeat

n :=i*i;

i :=i+2;

until n>2*i;

假设所有变量均已说明,问其中循环体的执行次数是:

A.1 B.2 C.3 D.4

14、如果用户不希望别人看到他在文本编辑框中输入的字符,可以将TEdit的[ ]属性设置为*。

A.PasswordChar B. Caption C. Text D. Name

15、若要设置TLabel组件中的文本在水平方向上居中对齐,应将[ ]属性值设为taCenter。

A.Alignment B. Layout C. WordWrap D. Transparent

二.填空题(第10、11空每空1分,其它每空2分,共4 0分).

1、Delphi是在原有(1)语言的基础之上发展走来的。

2、表达式 Succ(‘H’)+Pred(‘U’) 的值为 (2) 。

3、用布尔表达式表示下列命题: y ∈[-10,-1],或者y∈[1,10] (3) ;n是m的倍数 (4)。

4、OOP是一种非常重要的编程思想,它的三个特征是 (5) 、(6)、(7),与该编程思想相对应的是面向过程

编程,C语言就是面向过程编程的典型代表。

5、异常处理有两种结构:try...except...end形成了一个(8)保护块,try...finally...end形成了一个(9)

保护块。正常情况下,except后面的语句(10) (会/不会)被执行,finally后面的语句(11) (会/不会)被执行.

6、Raise方法的作用是:(12) .

7、TRadioButton组件的(13)属性为True时,该单选按钮处于选中状态。

8、TBitBtn叫位图按钮,它的(14)属性用来设置按钮的种类,可以选择bkAbort,bkOK,bkNO等,对于这些常用

的位图按钮,Delphi已给它们作好了显示的文字,还附上了相应的图标。

9、Delphi提供了公共对话框组件供编程者直接使用,要打开这些对话框需要编写相应代码,一般的打开方式是

调用这些对象的(15)方法。

10、数据库系统由三大部分组成: (16) ,(17) ,(18) . 目前,(19) 型数据库系统应用最为广泛。

11、TADOConnection组件用于与数据库建立连接,它有一个(20) 属性,这个属性用于控制连接数据库时是否

弹出登陆对话框,当它为True时,无论在ConnectionString中是否包含了用户密码码信息,程序都将弹出一个登陆对话框。该组件可以获取数据库的数据表信息,这需要用到(21) 方法。

三.判断题(每题1分,共5分)

1、对象的Name属性值可以为空。

2、TLabel和 TEdit组件都可以用于用户输入数据。

3、TStatusBar组件一般放置在窗体的底部,可以分成几个窗口,每个窗口可以显示不同的信息。

4、在窗体的FormCreate事件过程中定义的变量是全局变量。

5、当程序运行时,如果要求窗体中的某个按钮不再显示,只需将该按钮的Visible属性设置为false。

(10分)声明一个水果类TFruit ,私有成员为FName(水果名,string类型),FColor(颜色,TColor类型),FTaste(味四.

道,Ttaste类型),公共属性为Color,从FColor里获取属性值,通过SetColor方法设置属性值,默认值为red,公共方法有Infor过程,没有参数。

五.(15分)数据库Contact.mdb中有“公司”表和“联系人”表,结构如下:

公司:公司编号,公司名称,地址,城市,省区市,邮政编码,地区,国家,网站;

联系人:联系人编号,公司编号,姓名,出生日期,籍贯,电话,电子邮箱;

两表通过“公司编号”关联,在窗体上显示地区为“北京”的公司的所有联系人姓名及其所在公司名称,如下图所示:

Delphi期末考试试卷

窗体上ADOConnection1组件已连接了Contact.mdb,请对数据库组件的相关属性进行设置:ADOConnection1.LoginPrompt:= (1)

ADOQuery1.Connection:= (2)

ADOQuery1.SQL.Text:=‘ (3) ’

ADOQuery1.Active:= (4)

DataSource1.DataSet:= (5)

DBGrid1.DataSource:= (6)

DBNavigator1.DataSource:= (7)

窗体上“排序”按钮的功能是对记录以“公司名称”进行升序排列,“过滤”按钮的功能是只显示姓郑的联系人的信息,请编写代码完成相应功能:

procedure TForm1.BtnSortClick(Sender: TObject); //排序

begin

(8)

end;

procedure TForm1.BtnFilterClick(Sender: TObject); //过滤begin

(9)

end;

汕头职业技术学院

2006-2007学年第一学期期末试卷答题卷(A)

课程名称Delphi 系(校区)班级姓名学号

一.(30分)选择题.

题号 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 答案

二.(40分)填空题.

1.(1)2.(2)

3.(3)

(4)

4.(5)(6)

(7)

5.(8)(9)

(10)(11)

6.(12)7.(13)

8.(14)9.(15)

10.(16)(17)

(18)(19)

11.(20)(21)

三.(5分)判断题(在题号后打勾或打叉).

1. 2. 3. 4. 5.

四.(10分)定义类

五.(15分)编程

(1)

(2)

(3)

(4)

(5)

(6)

(7)

(8)

(9)

汕头职业技术学院

2006-2007学年第一学期期末试卷答案(A)一.CDCAA BCDAB CBCAA

二.(1)Pascal (2) IT (3) y>=-10 and y<=-1 or y>=1 and y<=10

(4) n mod m = 0 (5)数据封装(6)继承性(7)多态性

(8)异常响应 (9)资源 (10)不会 (11)会 (12)抛出异常

(13)Checked (14)kind (15)Excete

(16)数据库 (17)数据库管理系统 (18)数据库应用程序 (19)关系

(20)LoginPrompt (21)GetTableNames

三.FFTFT

四.Type

TFruit=Class

private

FName:string;

FColor: string;

FTaste: Ttaste;

public

property Color: string read FColor write SetColor default ‘red’; procedure Infor;

end;

五.(1)false

(2) ADOConnection1

(3) select 联系人.姓名,公司.公司名称 from 联系人,公司

where 联系人.公司编号=公司.公司编号 and 公司.地区 like ''北京%''

(where 联系人.公司编号=公司.公司编号 and 公司.地区=''北京'')

(4) true

(5) ADOQuery1

(6) DataSource1

(7) DataSource1

(8) ADOQuery1.Sort:=’公司名称 ASC’;

(9) ADOQuery1.Filtered:=false;

ADOQuery1.Filter:=’姓名 like ''郑%''’;

ADOQuery1.Filtered:=true;