欢迎来到PP题库网 PP题库官网
logo
全部科目 > 国家开放大学(电大) > 信息系统开发与维护(专科) > 国家开放大学(Delphi程序设计)

填空题

本程序根据用户选择的运算符对输入的二个操作数进行运算,并显示运算结果。设计界面和运行界面如图所示。其中,运算符是一个含有4个单选按纽的RadioGroup1对象。
 

下面是单击“运算”按钮的事件处理程序,请根据功能要求完成程序填空。

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

    点击查看答案
    微信小程序免费搜题
    微信扫一扫,加关注免费搜题

    微信扫一扫,加关注免费搜题