Сложение двух чисел из Edit1 и Edit2

[Дарья2]

Результат сложения должен автоматически отображаться в Edit3. без нажатия каких-либо кнопок. пожалуйста код и куда его вставлять

[Stilet]

Edit3.Text:=StrToFloatDef(StringReplace(Edit1.Text,',','.',[]),0)
              +StrToFloatDef(StringReplace(Edit2.Text,',','.',[]),0);

Вставлять в события OnChange обоих (1 и 2) Эдитов.

[Дарья2]

пишет ошибку "Не удалось обобщить использованный блок"

[Stilet]

Скриншот ошибки и строки на которой ошибка всплыла в студию )

[Дарья2]

во так вот)

[Stilet]

А-а-а. Ну да:

Edit3.Text:=FloatToStr(StrToFloatDef(StringReplace(Edit1.Text,',','.',[]),0)
              +StrToFloatDef(StringReplace(Edit2.Text,',','.',[]),0));

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

[Дарья2]

спасибо за помощь

[xxbesoxx]

Сообщение от Дарья2

Результат сложения должен автоматически отображаться в Edit3. без нажатия каких-либо кнопок. пожалуйста код и куда его вставлять

1)

  private
     procedure Vichislenia;

2)

procedure TForm1.Vichislenia;
 var
  a, b, c : Real;
begin
   a := StrToFloatDef(Edit1.Text,0);
   b := StrToFloatDef(Edit2.Text,0);
   c :=  a+b;
   Edit3.Text := FloatToStr(c);
end;

3)

procedure TForm1.Edit1Change(Sender: TObject);
begin
   Vichislenia;
end;

procedure TForm1.Edit2Change(Sender: TObject);
begin
 Vichislenia;
end;