国家开放大学《Delphi程序设计》最新试题
（单选题）
要改变控件的宽度，应改变控件的（）属性。
（判断题）
在Data Controls组件页上，只有DBNavigator组件可以不用指定DataField属性值。
（单选题）
只能输出、而不能输入的数据感知控件是（）
（填空题）
RadioGroup对象中的单选按钮个数及名称是通过（）属性进行设置的
（判断题）
若已在窗体中加入了一个通用对话框OpenDialog组件：要求在运行时，打开对话框时只显示扩展名为DOC的文件，则对通用对话框的Filter的属性进行设置，设置可以是：’Word DOC Files|*.DOC’。
（填空题）
本程序由主窗体form1和子窗体form2组成，设计界面如下图所示： 主窗体Form1上建立的对象有Panel1、MediaPlayer1、OpenDialog1、Button1（打开文件）、Button2（播放）、Button3（暂停）、Button4（退出）。 子窗体Form2上建立的对象有Label1、BitBtm1（Yes）、BitBtm2（No）。 单击“打开文件”按钮，会弹出打开文件对话框。用户指定一个要播放的文件后，单击“播放”按钮可播放多媒体文件，单击“暂停”按钮可暂停播放。 单击“退出”按钮，会弹出确认对话框（Form2）。如果用户按“Yes”键，程序结束；如果按“No”键，返回主窗体。 下面是Unit1的代码部分，请在下划线处完成程序填空。
（单选题）
表达式30＋19div2的值是（）
（单选题）
“x 是小于100的非负数”的Object Pascal表达式是（）
（判断题）
要想在数据集中增加计算字段，必须先将数据集的字段全部置为动态字段。
（填空题）
与数学表达式对应的Object Pascal表达式是（）
（填空题）
计时器控件能有规律的以一定时间间隔触发（）事件，并执行该事件过程中的程序代码。
（填空题）
利用MediaPlayer 组件实现一个播放wav声音文件的播放器。用户可自己选择要打开的 wav文件，并在播放时有播放进度提示（如图）。首先在在窗体中添加1个MediaPlayer组件MediaPlayer1、1个标签组件Label1、2个按钮组件（“打开文件”－Button1，“退出”－Button2），1个时钟组件Timer1和1个OpenDialog组件OpenDialog1，一个gauge组件（用作播放进度显示）。进度提示条每隔0.1秒更新一次进度。将程序补充完整。 procedure TForm1.Button1Click（Sender： TObject）； begin if OpenDialog1.Execute Then Begin MediaPlayer1.filename := OpenDialog1. （①） ; Label1.（②） := OpenDialog1.filename; MediaPlayer1.open; //打开声音文件 MediaPlayer1. （③） ; //开始播放 Timer1.enabled := （④） ; end; end; procedure TForm1.Timer1Timer(Sender: TObject); begin Timer1.Interval := （⑤） ; //每隔0.1秒更新一次进度 gauge1.maxvalue := MediaPlayer1.length; gauge1. （⑥） := MediaPlayer1.Position; //更改进度 end; procedure TForm1.Button2Click(Sender: TObject); begin close; end;
（填空题）
数据库mydb中有关系表student，其结构如下： student（sno学号，sname姓名，sex性别，birthday生日） 现编写一个学生信息浏览程序，设计界面和运行界面如下图所示： 在下划线处填写相应数据库组件的属性值： Database1. DatabaseName : mydb Table1. DatabaseName : mydb T able1. TableName : student Table1. Active :（①） Datasource1.DataSet :（②） DBNavigator1. DataSource : （③） DBEdit2. DataSource :（④） DBEdit2. DataField :（⑤）
（单选题）
下面哪句话对Delphi的描述是正确的（）
（填空题）
当程序运行时，如果要求窗体中的某个按钮不再显示，可以将该按钮的（）属性设置为false 即可
（填空题）
本程序实现一个简单的借书界面。程序的设计界面和运行界面如下图所示： 该程序涉及到数据库中的两张表：books（图书信息）和borrow（借书记录）。表的结构为： books（bno，书号，bname书名，num现有册数） borrow（rno 读者号，bno书号，rdate还书日期） 其中，rno和bno都是字符型（3位）。 在用户界面，操作员选中一本书、输入借书证号后，按“借书”键完成借书功能，即在borrow表中插入一条借书记录，并将books表中该书现有册数减1。 该界面要实现以下合法性检查： 1.当该读者已经借了此书，不能再借。 2.当所借的书现有册数为0，不能再借。 在Form1上建立的数据库组件对象及连接关系如下： Database1－Table1（与books表相连）－DataSource1－DBGrid1（显示图书信息） Database1－Table2（与borrow表相连，用于插入借书记录） Database1－Query1 其中为Table1建立了3个永久字段：Table1bno（书号）、Table1bname（书名）、Table1num（现有册数）。 Query1的SQL语句如下： select bno from borrow where rno = :rno and bno = :bno 下面是Unit1的代码实现部分，请完成程序填空：
（判断题）
在设计阶段，如果在Query对象的SQL语句中设置了参数，则必须在Query的Params属性中为参数设置数据类型。
（单选题）
“x 是小于10的非负数”的Object Pascal表达式是（）
（填空题）
调用主窗体的（）方法，可以结束程序关闭窗体。
（填空题）
如果让界面上的一个按钮变为不可用，需要将它的（）属性设为False。
