Suma de 2 Reales

[lKinGl]

Estoy intentando hacer una suma de 2 números reales pero da error al colocar el decimal

Tengo un formulario con:

edit1=n1=Número 1
edit2=n2=Número 2
edit3=n3=Total

Boton Calcular
Boton Cerrar

el Boton Calcular declaré las variables tipo Double el cual son las nombradas anterior mente n1,n2,n3

y estoy haciendo esto en el boton calcular:

Código Delphi [-]
 
n1:=strtofloat(edit1.text);
n2:=strtofloat(Edit2.text);
n3:=n1+n2;
edit3.text:=floattostr(n3);

cuando sumo 1+2 da el resultado 3

cuando sumo 1.5 +2 da el error

pueden ayudarme??

Gracias Adelantadas