delphi模拟试题2.docVIP

本试卷命题与审核： 命题单位（盖章） 教研室主任审核签名 领导审核签名 荆州职业技术学院×××学年度第××学期 《delphi程序设计》期末考试试卷 系 班级 姓名 学号 成绩 一、选择题（20*2） 1. 用户开发程序时需要经常在窗体和编辑器窗口之间来回切换，可使用快捷键（ ）。 A、 F12和F11 B、 F12和F13 C、 F12和Ctrl+F12 D、 F12和Alt+F12 E、F12和Shift+F12 2. 某函数如下： Function check(n,k:Integer):Integer; Var m:Integer; Begin Repeat m:=n mod 10; n:=n div 10; K:=k-1 Until k=0; Check:=m End; 若调用语句y:=check(3725,3),运行后y值为：（ ） A、 7 B、 5 C、 2 D、 0 3. 以下那个组件不可以由用户输入编辑文本（ ） A、 TEdit B、 TcomboBox C、 TMaskEdit D、 Tlabel E、 TStringGrid 4. 一个对象类可以继承和直接使用它的父类的所有成员，除了：（ ） A、 public域 B、 private域 C、 protected域和private域 D、 protected域和方法 E、 private域和方法 5. Delph没有用到的文件类型有（ ）。 A、.frm B、.pas C、.dfm D、.dpr E、.res 6. Query组件没有Table组件那样的（ ）属性。 A、 DataSource B、 TableName C、 Filtered D、 Database E、 UpdateObject 7. 下面关于属性的论述正确的是（ ）。 A、 属性能实现write方法 B、 属性能实现read方法 C、 属性可以只读或只写 D、 属性可以公开或非公开 E、属性不能直接存取 8. 调试程序时，需要执行执行点所在的源代码行，并停留在下一个源代码行。可通过（ ）菜单项进行。 A、 Run B、 Step Over C、 Trace Into D、 Trace To Next Source Line E、Run to Cursor 9. 已知 Var a:array[1..10] of integer; k,I:integer; 程序段： k:=1; for I:=1 to 10 do if a[i]a[k] then k:=I; writeln(a[k]); 执行后输出的是( ) A、 数组中的平均值 B、 数组中的最大值 C、 数组中的最小值 D、 数组中的总和 E、 无法确定 10. 已知Var f:file of integer;则f所代表的文件是（ ） A、 ASCII码文件 B、 二进制文件 C、 文本文件 D、 存放整数的文本文件 E、 HTML文件 11. 在VCL中（ ）是TDBListBox的父类 A、 TCustomListBox B、 TListBox C、 TDBDataset D、 TDatabase E、TDBEdit 12. 为让控件显示弹出式提示框文字，需用到控件的（ ）属性 A、 Handle B、 Hint C、 ShowHint D、 Showing E、Visible 13. 发生在鼠标左键单击控件时的事件是（ ） A、 OnMouseDown B、 OnMouseUp C、 OnClick D、 OnDbClick E、OnEnter 14. 下列值中不是FormStyle属性的可能值的是（ ） A、 fsNormal B、 fsMIDChild C、 fsMIDForm D、 fsStayOnTop E、fsDeskTop 15. 使用Delphi多线程的优点是（ ） A、程序运行速度加快 B、不需要考虑同步访问共