[samuilius]

Сообщение от MiraLaklamon

Конечно не будет. В инспекторе объектов, просто укажи тот же обработчик для edit4 (и для других edit которым нужно).

то есть вот так ?

Код:

procedure TForm1.edt2Change(Sender: TObject);
begin
a := StrToFloat(edt1.Text);
b := StrToFloat(edt2.Text);
c := a*b ;
lbl1.Caption := FloatToStr(c);
end;

end.
//--------------------------------------------------------
procedure TForm1.edt4Change(Sender: TObject);
begin
a := StrToFloat(edt3.Text);
b := StrToFloat(edt4.Text);
c := a*b ;
lbl1.Caption := FloatToStr(c);
end;

end.
//--------------------------------------------------------------
procedure TForm1.edt6Change(Sender: TObject);
begin
a := StrToFloat(edt5.Text);
b := StrToFloat(edt6.Text);
c := a*b ;
lbl1.Caption := FloatToStr(c);
end;

end.