Hola, tienes que usar también en tu procedimiento de abajo el tipo double, ya que los resultados que tienes en tus edit son de ese tipo.
Código Delphi
[-]
var
n1,n2,nt:double;
begin
n1:=strtofloat(edit7.text);
n2:=strtofloat(Edit8.text);
nt:=n1+n2;
edit9.text:=floattostr(nt);
Saluditos