l8.Delphi应用程序中项目文件的扩展名是 19.在设计阶段，利用1mage对象的 属性，可以加载一幅图片。 20.Delphi有三种控制循环的语句：repeat语句， 语句，for语句。 21.下面的语句用来删除Tmemo组件的第4行，请补充完整： memol.lines.delete(); 22.Delphi程序与数据库之间进行数据交换一般要由多个数据库组件协作完成。如果用 户要查询数据库中的一条信息，该指令通过用户界面组件发出，经数据源组件到达数据集组 件。数据集组件利用 组件与数据库建立连接，并读取数据库 中的数据，而后又经过 组件将数据送到用户界面组件中显示。 23.与数学表达式cosa+b)+a对应的Object Pascal表达式是 a2Xx 24.利用 对象的LineTo等绘图方法，可以绘制基本图形。 得 分 评卷人 四、程序填空题(30分，每题10分)】 25.(10分，每空2分) 本程序根据用户选择的运算符对输人的二个操作数进行运算，并显示运算结果。设计界 面和运行界面如图所示。其中，运算符是一个含有4个单选按纽的RadioGroupl对象。 Formi Formi 请选择 操作数1：diti 请选择 操作数1B网 。加 加 c减 操作数2Edit2 减 操作数2p 月r乘 r除 结果抢dit3 c除 结果3 运算 退出 运算 退出 5投 下面是单击“运算”按钮的事件处理程序，请根据功能要求完成程序填空。 procedure TForm1.ButtonlClick(Sender:TObject);// var x1,x2,y Integer; begin x1 :StrToInt(Edit1.D x2 :StrToInt(Edit2.2 Case③ ItemIndex of 139718. Delphi 程序 19. 设计 用Image 对象 加载一 20. Delphi 种控 repeat for 1. 下 面 除Tmemo 组件 的第4 补充完整 memo1. lines. deleteC ) ; 22. Delphi 据库之 进行数据交换一 件协 户要查询数据库中的一条信息，该指令通过用户界面组件发出，经数据源组件到达数据集组 件。数据集组件利用组件与数据库建立连接，并读取数据库 中的数据，而后又经过组件将数据送到用户界面组件中显示。 S2 Ca +b) .与数学表达式 a对应的 e c Pascal 表达式 a- )飞 24. 对象的 o等绘图方法，可以绘制基本图形。 得分|评卷人 四、程序填空题 0分，每题 0分} 3亨丁 ‘.:"‘'‘ 下面是单击"运算"按钮的事件处理程序，请根据功能要求完成程序填空。 procedure TForm1. Button1ClickCSender: TObject);//运算 var xl , x2 , y : Integer; begin xl : = StrToIntC Editl. x2 : = StrToIntC Edit2. Case ) ; . ItemIndex of 1397