文档介绍：本试卷命题与审核: 命题单位(盖章) 教研室主任审核签名领导审核签名荆州职业技术学院××× 学年度第×× 学期《delphi 程序设计》期末考试试卷系班级姓名学号成绩一、选择题( 20*2 ) ,可使用快捷键()。 A、F12 和F11 B、F12 和F13 C、F12 和Ctrl+F12 D、F12 和Alt+F12 E、F12 和Shift+F12 : 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、7B、5C、2D、( ) A、TEdit B、TcomboBox C、TMaskEdit D、Tlabel E、TStringGrid ,除了:() A、public 域 B、private 域 C、protected 域和 private 域 D、protected 域和方法 E、private 域和方法 没有用到的文件类型有( )。 A、.frm B、.pas C、.dfm D、.dpr E、.res 组件没有 Table 组件那样的( )属性。 A、DataSource B、TableName C、Filtered D、Database E、UpdateObject ( )。 A、属性能实现 write 方法 B、属性能实现 read 方法 C、属性可以只读或只写 D、属性可以公开或非公开 E、属性不能直接存取 ,需要执行执行点所在的源代码行,并停留在下一个源代码行。可通过( )菜单项进行。 A、Run B、Step Over C、Trace Into D、Trace ToNext Source Line E、Run toCursor Var a:array[1..10] ofinteger; k,I:integer; 程序段: k:=1; for I:=1 to10do ifa[i]>a[k] then k:=I; writeln(a[k]); 执行后输出的是()A、数组中的平均值 B、数组中的最大值 C、数组中的最小值 D、数组中的总和 E、无法确定 10. 已知 Var f:file ofinteger; 则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、OnMouse