试题详情
简答题 在窗体上画一个名称为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;
  • ①text；②text；③RadioGroup1；④text；⑤y

  • 关注下方微信公众号，在线模考后查看

热门试题