[填空题]
在窗体上画一个名称为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;

量城市化发展的基本指标包括：①城市化水平指标；②（）；③城市化质量指标。其中城市化质量指标包括：城市现代化指标体系和（）。 What level of control does a subflow have on the overall contact?（） ["The subflow cannot call additional or "nested" subflows. ","The subflow cannot transfer the contact to another resource. ","The subflow has full contact control and can perform any action that the parent flow can perform."] Which three possible values can be set for the TIME_ZONE session parameter by using the ALTER SESSION command？（） [" ’os’"," local"," -8：00’"," dbtimezone Li"," ’Australia&rsquo"] 粘着磨损高压隔离开关按安装地点分为（）和（）两大类、一般只能在（）情况下才允许进行操作。

在窗体上画一个名称为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;

参考答案：

● 参考解析

本题暂无解析

当前位置：国家开放大学(Delphi程序设计)题库

相关题目: