填空题

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

答案解析

相似试题
  • 在窗体上画一个名称为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环境中,组件板上的组件就是类的概念,例如按钮组件就是按钮类。而用户在窗体上创建的一个按钮就是对象的概念(按钮对象)。

    判断题查看答案