2005年上学期《Delphi程序设计》期末考试试卷A一． 单选题 （2*6=12分）下列组件不是可视组件的是 ；
A GroupBox B ComboBox C OpenDialog D Label
2 若需让对象Label1上显示文本“你好”，可设置它的 属性；
A Text B Items C Caption D Lines
3 查询所有名称以E开头的姓名，可使用 ；
A SELECT * FROM student WHERE name = E ；
B SELECT * FROM student WHERE name LIKE ‘E%’ ；
C SELECT * FROM student HAVING name = E ；
D SELECT * FROM student HAVING name LIKE ‘E%’ ；
4 Delphi提供了一些开发工具，其中让用户创建数据库表，查询、修改、排序数据的是 ；
A Database Desktop B BDE Administrator C SQL Explorer
5 当按下鼠标上的任何一个键，会产生一个 事件；
A OnDragDrop B OnMouseDown C OnMouseUp D OnKeyPress
6 下面 不是Object Pascal语言的结构类型；
A set B file C array D subrange E record二． 选择填空 （2*8=16分）
显示、编辑多行文本，可使用 ①K 组件，通过它的 ②M 属性可输入想要在窗口显示的文本； ③D 组件主要用来响应鼠标的单击事件，BitBtn是 ④N 组件，可以通过 ⑤L 属性在组件上显示一个图标； ⑥G 是复选按钮组件，可以形成多项选择； ⑦I 是单选按钮组件，可以在多个条件中选择唯一的一个；ListBox组件可显示一行或多列文本项供用户选择，可以在设计阶段改变 ⑧E 属性来预先设置列表框的内容。
A Text B Enable C Button D Click
E Items F Kind G CheckBox H RadioGruop
I RadioButton J Edit K Memo L Glyph
M Lines N 图形按钮 O 组合框 P 位图管理三． 填空 （2*9=18分）
1 在Delphi中，运行期间出现的窗体和对话框中的组件称为 控件类 组件，其可分为 窗口控件类 组件和图形组件两类；
2 若向Listbox1增加条目“你好”，可使用代码 listbox1.Items .add(‘你好’) ；
3 用户在Edit组件中输入口令的时候，会显示星号（*），是由于设置了 PasswordChar 属性；
4 在很多组件中， Font 属性用来改变字符串的字体和颜色；
5 单元（unit）文件是带有 .Pas 扩展名的源程序代码，是组成Pascal程序的单独的源代码模块；
6在Delphi中，支持 无类型 文件，类型文件和文本文件；
7 对象最突出的特征有封装性、继承性和 多态性 ；
8 TDataSource组件 组件提供了联系数据集组件（如TTable组件）与数据控制组件（如TDBGird组件）的纽带。四． 判断正误 (1*12=12分)
1 使用变量前必须先声明它的名字和类型； √
2 所有变量都能给它赋初值； √
3 过程没有返回值，而函数有返回值； √
4 具有相同属性值的对象可看成一个类； X
5 RadioGroup组件能直接在组件面板上把组件添加到此组件中； X
6 ImageList组件是对位图进行管理的不可视组件； √
7 当按下键盘上的任一个键时都会产生OnKeyDown事件； √
8 一张二维表就是一个数据库；X
9 主关键字是能惟一确定表的一行的属性，一张表只能有一个主关键字；X
10 SQL是结构化查询语言的缩写，支持SQL编程是Delphi的重要特色；√
11 Delphi 是一种DBMS；X
12 Pascal语言对于字母的大小写不敏感，但字符串中区分大小写。X五．综合题 (3*14=42分)
1 如图所示，在Form窗口上放置Edit ,RadioGroup ,GroupBox组件，GroupBox中放置3个Checkbox组件，完成程序。
⑴ 属性设置
Edit1: ① Edit1.text 属性值为“Welcome to Beijing!”
Radiogroup1:Caption属性值为“字体颜色”，Items属性值为 ②3 ,
ItemIndex属性值为 ③ 2
GroupBox1:Caption属性值为“字体风格”
3个Checkbox: Caption属性值分别为“粗体”“斜体”“下划线”,CheckBox1的onclick设置为 boldclick
⑵ 事件响应代码
procedure TForm1.setcolor(Sender: TObject);
begin
with ④ do
case Radiogroup1.ItemIndex of
0:color:=clred;
1:color:=clyellow;
2:color:=clblue;
end;
end;procedure TForm1.boldclick(Sender: TObject);
begin
if checkbox1. ⑤ then
edit1.Font.Style:= ⑥
else
edit1.Font.Style:= ⑦ ;
end;2 如图所示，在Form窗口上放置
MainMenu1: TMainMenu;
F1: TMenuItem; N1: TMenuItem; O1: TMenuItem; S1: TMenuItem;
X1: TMenuItem; S2: TMenuItem; B1: TMenuItem; I1: TMenuItem;
U1: TMenuItem;
ToolBar1: TToolBar;
ToolButton1: TToolButton; ToolButton2: TToolButton;
ToolButton3: TToolButton; ToolButton4: TToolButton;
Button1: TButton; Button2: TButton; Button3: TButton;
RichEdit1: TRichEdit;
OpenDialog1: TOpenDialog;
SaveDialog1: TSaveDialog;
ImageList1: TImageList;
ImageList1保存了3个图标，如下图所示：
其中OpenDialog, SaveDialog位于 ① 标签上,ImageList位于Win32标签上.
⑴ 属性设置
ToolButton1.ImageIndex的值为2，ToolButton2.ImageIndex的值为 ② ，ToolButton3.ImageIndex的值为 ③ ；
F1.caption的值为文件(&F)，N1.caption的值为 ④ ，U1.caption的值为下滑线(&U)；
Button1. caption的值为B, Button1.Font.Style的值为 [fsBold] , Button1. caption的值为U ,Button3.Font.Style的值为 ⑤ ；⑵ 事件响应代码
procedure TForm1.S1Click(Sender: TObject);
begin
Form1.SaveDialog1. ⑥ ;
Form1.RichEdit1.Lines.SaveToFile(Form1.SaveDialog1.FileName);
end;procedure TForm1.N1Click(Sender: TObject);
begin
Form1.RichEdit1. ⑦ ;
end;
A GroupBox B ComboBox C OpenDialog D Label
2 若需让对象Label1上显示文本“你好”，可设置它的 属性；
A Text B Items C Caption D Lines
3 查询所有名称以E开头的姓名，可使用 ；
A SELECT * FROM student WHERE name = E ；
B SELECT * FROM student WHERE name LIKE ‘E%’ ；
C SELECT * FROM student HAVING name = E ；
D SELECT * FROM student HAVING name LIKE ‘E%’ ；
4 Delphi提供了一些开发工具，其中让用户创建数据库表，查询、修改、排序数据的是 ；
A Database Desktop B BDE Administrator C SQL Explorer
5 当按下鼠标上的任何一个键，会产生一个 事件；
A OnDragDrop B OnMouseDown C OnMouseUp D OnKeyPress
6 下面 不是Object Pascal语言的结构类型；
A set B file C array D subrange E record二． 选择填空 （2*8=16分）
显示、编辑多行文本，可使用 ①K 组件，通过它的 ②M 属性可输入想要在窗口显示的文本； ③D 组件主要用来响应鼠标的单击事件，BitBtn是 ④N 组件，可以通过 ⑤L 属性在组件上显示一个图标； ⑥G 是复选按钮组件，可以形成多项选择； ⑦I 是单选按钮组件，可以在多个条件中选择唯一的一个；ListBox组件可显示一行或多列文本项供用户选择，可以在设计阶段改变 ⑧E 属性来预先设置列表框的内容。
A Text B Enable C Button D Click
E Items F Kind G CheckBox H RadioGruop
I RadioButton J Edit K Memo L Glyph
M Lines N 图形按钮 O 组合框 P 位图管理三． 填空 （2*9=18分）
1 在Delphi中，运行期间出现的窗体和对话框中的组件称为 控件类 组件，其可分为 窗口控件类 组件和图形组件两类；
2 若向Listbox1增加条目“你好”，可使用代码 listbox1.Items .add(‘你好’) ；
3 用户在Edit组件中输入口令的时候，会显示星号（*），是由于设置了 PasswordChar 属性；
4 在很多组件中， Font 属性用来改变字符串的字体和颜色；
5 单元（unit）文件是带有 .Pas 扩展名的源程序代码，是组成Pascal程序的单独的源代码模块；
6在Delphi中，支持 无类型 文件，类型文件和文本文件；
7 对象最突出的特征有封装性、继承性和 多态性 ；
8 TDataSource组件 组件提供了联系数据集组件（如TTable组件）与数据控制组件（如TDBGird组件）的纽带。四． 判断正误 (1*12=12分)
1 使用变量前必须先声明它的名字和类型； √
2 所有变量都能给它赋初值； √
3 过程没有返回值，而函数有返回值； √
4 具有相同属性值的对象可看成一个类； X
5 RadioGroup组件能直接在组件面板上把组件添加到此组件中； X
6 ImageList组件是对位图进行管理的不可视组件； √
7 当按下键盘上的任一个键时都会产生OnKeyDown事件； √
8 一张二维表就是一个数据库；X
9 主关键字是能惟一确定表的一行的属性，一张表只能有一个主关键字；X
10 SQL是结构化查询语言的缩写，支持SQL编程是Delphi的重要特色；√
11 Delphi 是一种DBMS；X
12 Pascal语言对于字母的大小写不敏感，但字符串中区分大小写。X五．综合题 (3*14=42分)
1 如图所示，在Form窗口上放置Edit ,RadioGroup ,GroupBox组件，GroupBox中放置3个Checkbox组件，完成程序。
⑴ 属性设置
Edit1: ① Edit1.text 属性值为“Welcome to Beijing!”
Radiogroup1:Caption属性值为“字体颜色”，Items属性值为 ②3 ,
ItemIndex属性值为 ③ 2
GroupBox1:Caption属性值为“字体风格”
3个Checkbox: Caption属性值分别为“粗体”“斜体”“下划线”,CheckBox1的onclick设置为 boldclick
⑵ 事件响应代码
procedure TForm1.setcolor(Sender: TObject);
begin
with ④ do
case Radiogroup1.ItemIndex of
0:color:=clred;
1:color:=clyellow;
2:color:=clblue;
end;
end;procedure TForm1.boldclick(Sender: TObject);
begin
if checkbox1. ⑤ then
edit1.Font.Style:= ⑥
else
edit1.Font.Style:= ⑦ ;
end;2 如图所示，在Form窗口上放置
MainMenu1: TMainMenu;
F1: TMenuItem; N1: TMenuItem; O1: TMenuItem; S1: TMenuItem;
X1: TMenuItem; S2: TMenuItem; B1: TMenuItem; I1: TMenuItem;
U1: TMenuItem;
ToolBar1: TToolBar;
ToolButton1: TToolButton; ToolButton2: TToolButton;
ToolButton3: TToolButton; ToolButton4: TToolButton;
Button1: TButton; Button2: TButton; Button3: TButton;
RichEdit1: TRichEdit;
OpenDialog1: TOpenDialog;
SaveDialog1: TSaveDialog;
ImageList1: TImageList;
ImageList1保存了3个图标，如下图所示：
其中OpenDialog, SaveDialog位于 ① 标签上,ImageList位于Win32标签上.
⑴ 属性设置
ToolButton1.ImageIndex的值为2，ToolButton2.ImageIndex的值为 ② ，ToolButton3.ImageIndex的值为 ③ ；
F1.caption的值为文件(&F)，N1.caption的值为 ④ ，U1.caption的值为下滑线(&U)；
Button1. caption的值为B, Button1.Font.Style的值为 [fsBold] , Button1. caption的值为U ,Button3.Font.Style的值为 ⑤ ；⑵ 事件响应代码
procedure TForm1.S1Click(Sender: TObject);
begin
Form1.SaveDialog1. ⑥ ;
Form1.RichEdit1.Lines.SaveToFile(Form1.SaveDialog1.FileName);
end;procedure TForm1.N1Click(Sender: TObject);
begin
Form1.RichEdit1. ⑦ ;
end;
2005年上学期《Delphi程序设计》期末考试试卷A 一． 单选题 （2*6=12分） 下列组件不是可视组件的是 ；
A GroupBox B ComboBox C OpenDialog D Label
2 若需让对象Label1上显示文本“你好”，可设置它的 属性；
A Text B Items C Caption D Lines
3 查询所有名称以E开头的姓名，可使用 ；
A SELECT * FROM student WHERE name = E ；
B SELECT * FROM student WHERE name LIKE ‘E%’ ；
C SELECT * FROM student HAVING name = E ；
D SELECT * FROM student HAVING name LIKE ‘E%’ ；
4 Delphi提供了一些开发工具，其中让用户创建数据库表，查询、修改、排序数据的是 ；
A Database Desktop这个工具不能进行查询（但能打开表查看，与使用Select语句查询还是有一定区别的 B BDE Administrator C SQL Explorer
5 当按下鼠标上的任何一个键，会产生一个 事件；
A OnDragDrop B OnMouseDown C OnMouseUp D OnKeyPress
6 下面 不是Object Pascal语言的结构类型；
A set B file File不是，TFileStream是 C array D subrange E record 二． 选择填空 （2*8=16分）
显示、编辑多行文本，可使用 ①K 组件，通过它的 ②M 属性可输入想要在窗口显示的文本； ③D 组件主要用来响应鼠标的单击事件，BitBtn是 ④N 组件，可以通过 ⑤L 属性在组件上显示一个图标； ⑥G 是复选按钮组件，可以形成多项选择； ⑦I 是单选按钮组件，可以在多个条件中选择唯一的一个；ListBox组件可显示一行或多列文本项供用户选择，可以在设计阶段改变 ⑧E 属性来预先设置列表框的内容。
同意所给答案
A Text B Enable C Button D Click
E Items F Kind G CheckBox H RadioGruop
I RadioButton J Edit K Memo L Glyph
M Lines N 图形按钮 O 组合框 P 位图管理 三． 填空 （2*9=18分）
1 在Delphi中，运行期间出现的窗体和对话框中的组件称为 控件类 组件，其可分为 窗口控件类 组件和图形组件两类；
2 若向Listbox1增加条目“你好”，可使用代码 listbox1.Items .add(‘你好’) ；
3 用户在Edit组件中输入口令的时候，会显示星号（*），是由于设置了 PasswordChar 属性；
4 在很多组件中， Font 属性用来改变字符串的字体和颜色；
5 单元（unit）文件是带有 .Pas 扩展名的源程序代码，是组成Pascal程序的单独的源代码模块；
太多了，看不过来，就这点吧，有的问题太学术化太概念化了，不知道究竟答案是什么，反正我在使用的时候不会遇到这样的问题。