Hola
1,2 es un numero que tiene decimales, en este caso, un decimal el numero 2.
Por eso la operacion que hiciste da error, usas integer que no contiene decimales, tienes que usar float que si los permite, asi:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
edit4.Text:= Floattostr(StrToFloat(edit3.Text) + StrToFloat(edit7.Text) + StrToFloat(edit8.Text));
end;
Saludos