1、1000 D (x =0) AND (x 1000) 4、工具栏上的一个SpeedButton按钮如果要设置为状态按钮,则正确设置的方法是( )A将SpeedButton按钮的GroupIndex属性设置为0,且AllowAllUp属性设置为True。B将SpeedButton按钮的GroupIndex属性设置为0,且AllowAllUp属性设置为False。C将SpeedButton按钮的GroupIndex属性设置为非0值,且AllowAllUp属性设置为True。D将SpeedButton按钮的GroupIndex属性设置为非0值,且AllowAllUp属性设置为False。5、利用Im
2、age对象的哪个属性设置,可以使加载的图像自动放大或缩小,以适应Image的显示区域( )AStretch BAutoSizeCAlign DCenter6、现建立一个简单报表,仅包含报表标题栏、数据栏和汇总栏,则在Bands属性的子属性中,不需要选择的是( )ATitle BDetailCHasColumnHeader DSummary 7、最适合于在工具栏上放置的工具按钮是( )AButton BRadioButtonCSpeedButton DBitBtm 8、只能输出、而不能输入的数据感知控件是( )ADBEdit BDBTextCDBRadioGroup DDBCheckBox 9、
3、如果要检查edit编辑框中输入的字符,可以在哪个事件处理程序中编写代码检查( )AOnClick BOnEnterCOnMouseUp DOnKeyPress 10、下面哪个组件不是容器组件( )AForm BPanelCGroupBox DMaskEdit 三、判断题(10分,每题1分)请给下列论述中正确的打上“”,错误的打上“” 1、( )在Delphi环境中,在窗体上建立的按钮是“类”的概念。2、( )编辑框组件能够响应的某些事件在按钮组件上是不会发生的。3、( )在对文件的操作中,reset是打开一个老文件。4、( ) 编辑框edit的ReadOnly属性如果设置为true,在代码中还
4、是可以对text属性赋值。5、( )SaveDialog组件的功能是指定一个文件名,并将编辑区中的内容保存到文件中。6、( )在一个项目中,第一个建立的窗体就是主窗体。7、( ) 在Data Controls组件页上,只有DBNavigator组件可以不用指定DataField属性值。8、( )一个Query对象同一时刻只能存储一条SQL语句。9、( )要想在数据集中增加查找字段,必须先将数据集的字段全部置为动态字段。10、( )在设计阶段,如果在Query对象的SQL语句中设置了参数,则必须在Query的Params属性中为参数赋初始值。四、程序填空题(40分,每题10分)1、(10分,每空
5、2分)本程序由主窗体form1和子窗体form2组成,设计界面如下图所示:主窗体上建立的对象有Panel1、Animate1、Button1(加载AVI文件)、Button2(退出)、Button3(播放)、Button4(停止)和OpenDialog1。子窗体上建立的对象有Label1、BitBtm1(Yes)、BitBtm2(No)。单击“加载AVI文件”按钮,会弹出打开文件对话框。用户指定一个.avi的文件后,动画文件加载到Animate1显示区中。单击“播放”按钮可播放动画,单击“停止”按钮可停止播放。单击“退出”按钮,会弹出确认对话框(Form2)。如果用户按“Yes”键,程序结束;
6、如果按“No”键,返回主窗体。下面是Unit1的代码部分,请在下划线处完成程序填空。-implementation$R *.dfmuses ;procedure TForm1.Button1Click(Sender: TObject); /加载AVI文件begin if then animate1.FileName := ; end;procedure TForm1.Button2Click(Sender: /退出if = mrYes then close ;end;procedure TForm1.Button3Click(Sender: /播放 animate1.Play(1,animat
7、e1.FrameCount,0) ;procedure TForm1.Button4Click(Sender: /停止 animate1. ;end.2、(10分,每空2分)数据库mydb中有关系表student,其结构如下:student(sno学号,sname姓名,sex性别,birthday生日)现编写一个学生信息浏览程序,设计界面和运行界面如下图所示。在下划线处填写相应数据库组件的属性值:Database1. DatabaseName : mydb Table1. DatabaseName :Table1. TableName : studentTable1. Active : Dat
8、asource1.DataSet : DBNavigator1. DataSource : DBEdit2. DataSource : DBEdit2. DataField : 3、(10分,每空2分)本程序的功能是实现对dep表(系)student表(学生)的主从查询。用户可以依次查询系的记录,也可以通过指定系号,查找并定位到指定的记录。每当显示一个系的记录后,系统自动显示该系的学生记录。设计界面和运行界面如下:在Form1上建立的主要对象及连接如下:Database1Table1(与dep表相连)DataSource1DBEdit1DBEdit3Database1Query1DataSou
9、rce2DBGrid1(显示学生信息)Edit1、Button1(查找)、Button2(下一记录)、Button3(上一记录)等。Query1的SQL语句是:select *from studentwhere dno = :dno下面是Unit1单元的代码实现部分,请完成程序填空。 /下一记录 table1. ; /上一记录 table1. ; /查找 table1. (dno,edit1.Text,) ;procedure TForm1.Table1AfterScroll(DataSet: TDataSet); query1.Close ; query1.ParamByName().Val
10、ue := ; query1. ;4、(10分,每空2分)本程序实现一个简单的借书界面。程序的设计界面和运行界面如下图所示:该程序涉及到数据库中的两张表:books(图书信息)和borrow(借书记录)。表的结构为:books(bno,书号,bname书名,num现有册数)borrow(rno 读者号,bno书号,rdate还书日期)其中,rno和bno都是字符型(3位)。在用户界面,操作员选中一本书、输入借书证号后,按“借书”键完成借书功能,即在borrow表中插入一条借书记录,并将books表中该书现有册数减1。该界面要实现以下合法性检查: 当该读者已经借了此书,不能再借。 当所借的书现有
11、册数为0,不能再借。在Form1上建立的数据库组件对象及连接关系如下:Database1Table1(与books表相连)DataSource1DBGrid1(显示图书信息)Database1Query1、Query2其中为Table1建立了3个永久字段:Table1bno(书号)、Table1bname(书名)、Table1num(现有册数)。Query1的SQL语句如下:select bnofrom borrowwhere rno = :rno and bno = :bnoQuery2的SQL语句如下:insert into borrowvalues(:rno,:bno,:rdate)下面
12、是Unit1的代码实现部分,请完成程序填空: /“借书”按钮rno= ;bno= ; query1.Open ; if query1 null then begin showmessage(该读者正在借阅此书); exit ; end ; if = 0 then该书已全部借出 query2.Close ; query2.ParamByName(= edit1.Text ;= table1bno.Value ;rdate= date+15 ; query2. ; table1.Edit ; table1num.Value := table1num.Value - 1 ; /现有册数减1 tabl
13、e1. ;五、编程题(10分)下图是本程序的设计界面(左)和运行界面(右):在form1上建立的对象有:Label1Label5、Edit1Edit4、Button1(运算)和CheckBox1等。该程序实现除法运算。用户输入两个操作数,按除键后,整除结果显示在结果框中。输入的操作数必须是1100之间的整数。如果输入有误,程序要给出错误提示信息。如果“显示余数”复选框选中,则除法余数显示在余数框中,否则不显示余数。请编写单击“除键”按钮的事件处理程序。数据库设计与实践模拟试题(2)一、填空题(20分,每空2分) 1、结构化程序设计要求程序中仅采用顺序、分支和循环三种控制结构,其中每种结构只能有
14、一个入口和 。2、现实世界中对象具有自己的状态和行为。与此相对应,面向对象技术中的对象可以具有自己的 和方法。3、Delphi的一个项目由若干文件组成,其中与窗体文件对应的文件是 。4、在设计阶段,ListBox对象列表框中的内容是通过 属性来进行设置的。7、当Query对象中存储一条Delete语句时,执行该语句需要调用Query的 方法。8、与数学表达式 9、通过Animate对象的 属性设置,可以指定系统标准的AVI动画演示。10、利用 对象的LineTo等方法,可以绘制基本图形。A面向对象的可视化的开发环境 B多媒体制作工具 C数据库的客户端开发工具 D高级编程语言3、“x 是小于10
15、的非负数”的Object Pascal表达式是( ) 10 B (x 10) 10 D (x 10)4、工具栏上的一组按钮如果要构成互斥关系(如“左对齐”、“居中”、“右对齐”),它们的GroupIndex属性正确的设置是( )AGroupIndex属性值都为0 BGroupIndex属性值非0,且互不相同CGroupIndex属性值非0,且相同 DGroupIndex属性值互不相同5、利用Image对象的哪个属性设置,可以使Image对象的显示区域随着调入图像的大小自动调整以显示全图( )6、现建立一个简单报表,仅包含报表标题栏、数据列标题栏和数据栏,则在Bands属性的子属性中,不需要选择
16、的是( )AHasColumnHeader BDetailCTitle DSummary 7、在窗体上建立多页面,需要首先建立的对象是( )A TabControl BPageControl C HeaderControl DPageScroller 8、既可以通过选择输入、又可以直接输入的数据感知控件是( )ADBRadioGroup BDBListBoxCDBComboBox DDBCheckBox 9、如果要求每当光标进入edit编辑框中时,编辑框都清空,可以在哪个事件处理程序中编写代码实现( )AOnClick BOnMouseMove COnKeyPress DOnEnter CGr
17、oupBox DMemo 1、( )在Delphi环境中,组件页上的组件是“类”而不是“对象”。2、( )按钮组件和编辑框组件能够响应的事件有些是相同的。3、( )在对文件的操作中,reset是建立并打开一个新文件。4、( )编辑框edit中的内容能够设置为只读(即不能输入)。5、( )OpenDialog组件的功能是指定一个文件名,并将文件内容加载到指定的编辑区中。6、( )在一个项目中,可以有多个窗体,但只能有一个主窗体。7、( ) 在Data Controls组件页上,有的数据控件没有datafield属性。8、( )在程序运行期间,一个Table对象只能固定和一个关系表相连。9、( )
18、要想在数据集中增加计算字段,必须先将数据集的字段全部置为动态字段。10、( )在设计阶段,如果在Query对象的SQL语句中设置了参数,则必须在Query的Params属性中为参数设置数据类型。主窗体上建立的对象有Image1、Button1(加载图片)、Button2(退出)、OpenDialog1。单击“加载图片”按钮,会弹出打开文件对话框。用户指定一个图像文件后,图像加载到Image1显示区中。uses Image1.Picture.LoadFromFile( ); if = mrYes then ;本程序的功能是对books表(图书信息)进行浏览,设计界面和运行界面如下图所示。其中,“
19、在借册数”是根据当前显示的书号和borrow表(借书记录)的数据动态计算得到的。用户还可以输入指定书号,查找并定位到指定的记录。在form1上建立的主要对象有:Database1、Table1、Query1、DataSource1、DBEdit1DBEdit3Edit1Edit2、Button1Button3等其中Database1与mydb数据库相连,Table1对象与books表相连,DBEdit1、DBEdit2、DBEdit3分别和bno(书号)、bname(书名)、author(作者)各列相连。select count(*) numwhere bno = : table1. ( , edit2.Text , ) ;procedure TForm1.Button2C
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1