资源描述：
《delphi复习-程序填空(有答案)》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、复习要点•结构化程序设计的基本原则，程序中采用的三种控制结构，顺序、分支和循环•关于对象的叙述。对象的属性，对象的方法。2与数学表达式对应的ObjectPascal表达式：如皿⑺")+1009x•Delphi应用程序中项目文件、备份文件等各类的扩展名•各个组件的属性要掌握,重点如：按钮,Edit,ListBox,Timer,DBGrid,MaksEdit,Canvas•报表部分主要是了解概念•多看看考试指导，熟悉题型常用组件使用和循环操作1、本程序根据用户选择的运算符对输入的二个操作数进行运算，并显示运算结果。设计•界面和运行界面如
2、图所示。其中，运算符是一个含有4个单选按纽的RadioGroupl对象。7FormlJnlxl算一―运择选加减乘除-请aQGG操作数1
3、Editl操作数2
4、Edit2择选加减乘除请：：操作数1
5、34操作数2[g-结果(3退出I下面是单击“运算”按钮的事件处理程序,请根据功能要求完成程序填空。procedureTForml.ButtonlClick(Sender:TObject);//运算xl,x2,y:Integer;beginxl:=StrToInt(Editl.(1x2:二StrTo：[nt(Edit2.②)；Case③・Ito
6、mlndoxof0:y■•xl+x2;1：y■—■xl-x2;2：y•—■xl*x2;3：y■xlDivx2;End;Edit3.④:=IntToStr(⑤):end;①text③RadioGroupl②text④text■-Inix
7、;;输入_个正整数R;丽矿［计算I•■:1〜口中奇数之和I丽应一本程序设计界面和运行界面如下图所示:⑤y程序的功能是：用户在edill屮输入一个正整数m然后按“计算”按钮，程序计算1〜n中奇数之和，并在edit2中显示汁算结果。请完成程序填空：procedureTForml.ButtonlClick(
8、Sender:TObject);//“计算”按钮i,n,sum:integer;beginsum:=0;i:=1;n:=StrToInt(edit1.®);〃读入正整数nwhilei<=n②〃循环语句beginifodd(i)thensum:=③;i:=i+1;end;edit2.Text:=IntToStr(_®);〃将结果在编辑框小显示end;在程序屮，Odd为系统函数，其功能为：①Text②do③sum+i④sum⑤判断奇偶性的函数(若输入值为奇数，函数值为真，否则为假)。多窗体；打开、保存文件对话框用法3>本程序rfl主窗体
9、form1和子窗体form2组成，设计界面如下图所示:主窗体上建立的对象有Panel1>AnimatedButton1（加载AVI文件）、Button2（退出）、Button3（播放）、Button4（停止）和OpenDialoglo子窗体上建立的对象有LabelKBitBtml（Yes）、BitBtm2（No）。单击“加载AVI文件”按钮，会弹出打开文件对话框。用户指定一个.avi的文件后，动画文件加载到Animate!显示区中。单击“播放”按钮可播放动画，单击“停止”按钮可停止播放。单击“退出”按钮，会弹出确认对话框（Form2
10、）。如果用户按“Yes”键，程序结束;如果按“No”键,返回主窗体。下面是Unitl的代码部分，请在下划线处完成程序填空。implementation{$R*.dfm}uses;procedureTForml.ButtonlClick(Sender:TObject);〃加载AVI文件beginifthenanimate1.FileName:=③;end;procedureTForml.Button2Click(Sender:TObject);〃退出begin讦=mrYesthenclose;end;procedureTForml.B
11、utton3Click(Sender:TObject);〃播放beginanimatel.Play(l,animate1.FrameCount,0);end;procedureTForm1.Button4Click(Sender:TObject);〃停止beginanimateL©;end;end.③opendialog1.FileName⑤stop④form2.ShowModal木程序由主窗体form1和子窗体form2组成，界面如下图所示:主窗体上建立的対象有MemoKButton1-3>OpenDialog1、SaveDial
12、ogI。子窗体上建立的对象有LabelKBitBtml（Yes）、BitBtm2（No）。单击“打开文件”按钮（Button1）,会弹出打开文件对话框。用户指定一个文本文件后,文件内容加载到编辑区中（Mcmol）。单击“保存文件”按钮
