在窗体上画一个名称为Command1、标题为“计算”的命令按钮；画3个文本框，名称分别为Text1、Text2和Text3；然后画4个标签，名称分别为Label1、Label2、Label3和Label4，标题分别为“操作数1”、“操作数2”、“运算结果”、“＝”符；再建立一个含有4个单选按纽的RadioGroup组件，名称为RadioGroup 1，标题分别为“+”、“-”、“*”和“/”。程序运行后，在Text1、Text2中输入两个整数值，选中一个单选按钮后单击命令按钮，相应的计算结果显示在Text3，程序运行情况如图所示。请填入适当的内容，将程序补充完整。 
procedure TForm1.Button1Click(Sender: TObject); var x1,x2,y :Integer; begin x1 := StrToInt(Edit1.（①）); x2 := StrToInt(Edit2.（②）); Case （③）.ItemIndex of 0: y := x1 + x2 ; 1: y := x1 - x2; 2: y := x1 * x2; 3: y := x1 Div x2; End; Edit3. （④） := IntToStr(⑤); end;
procedure TForm1.Button1Click(Sender: TObject); var x1,x2,y :Integer; begin x1 := StrToInt(Edit1.（①）); x2 := StrToInt(Edit2.（②）); Case （③）.ItemIndex of 0: y := x1 + x2 ; 1: y := x1 - x2; 2: y := x1 * x2; 3: y := x1 Div x2; End; Edit3. （④） := IntToStr(⑤); end; 正确答案
答案解析
相似试题
（单选题）
在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： 程序运行后，单击命令按钮，则标签中显示的内容是（）
（填空题）
在窗体上画一个标签（名称为Label1）和一个时钟组件（名称为Timer1），添加2个按钮“开始”（Button1）和“停止”（Button2）。程序运行后，单击窗体“开始”按钮，时钟组件启动，并开始在标签中更新显示当前时间，每隔1秒钟变换一次，按停止按钮停止计时。（见图）。请填空｡ 然后编写如下几个事件过程: procedure TForm1.FormCreate(Sender: TObject); begin Timer1.Enabled :=（①） ; Timer1.Interval := （②） ; end; procedure TForm1.Button1Click(Sender: TObject); begin Timer1.Enabled := （③） ; end; procedure TForm1.Button2Click(Sender: TObject); begin Timer1.Enabled := （④）; end; procedure TForm1.Timer1Timer(Sender: TObject); begin label1.Caption := TimeToStr（⑤）; end;
（判断题）
在一个项目中，可以根据需要将任何一个窗体定义为主窗体。
（判断题）
在一个项目中，可以有多个窗体，但只能有一个主窗体
（判断题）
在一个项目中，第一个建立的窗体固定就是主窗体，并且再也不设置其他窗体为主窗体。
（填空题）
如果在窗体上设计一个主菜单，首先要建立（）对象。
（判断题）
在一个项目中可以有一个以上的主窗体（Main form）。
（填空题）
使用窗体的（）方法可以将一个窗体作为一个模式窗体（modal form）来打开。
（判断题）
在Delphi环境中，组件板上的组件就是类的概念，例如按钮组件就是按钮类。而用户在窗体上创建的一个按钮就是对象的概念（按钮对象）。
