Делфи7 создать форму с компонентами и обработчик клика

[Lubasha 29]

Создать приложение, на форму которого помещены компоненты
Batton-1
Label-1
Edit-2
Написать обработчик события OnClick компанента Batton, в котором происходит деление числа, записанного в первом компаненте Edit, на число записанное во втором. В компоненте Label отаброжается результат этого отношения. В случае деления на ноль в компоненте Label должно юыть отабражено соответствующие сообщение об ошибке с помощью ShowMessege. Помогите пожалуйста решить задачу))))

[Foreseen]

Замечательно, создаете форму, раскидываете компоненты, пишите обработчики, проверяете работоспособность. Задача решена. Искренне надеюсь, что помог вам в ее решении))))

[newerow1989]

procedure TForm1.Button1Click(Sender: TObject);
var a,b,c:real;
begin
   a:=StrToFloat(Edit1.Text);
   b:=StrToFloat(Edit2.Text);
   If b=0 then
      ShowMessage('div 0!') else
   begin
      c:=a/b;
      Label1.Caption:=FloatToStr(c);
   end;
end;