[ Foro de Pascal ]

sumar decimales con lazarus

este codigo suma enteros como modificaria para que sume reales o decimales
con lazarus de 64 bits y la ultima version?

procedure TForm1.Button1Click(Sender: TObject);

 var n1,n2,suma : integer;
begin
n1:= StrToint(edit1.Text);
n2:= Strtoint(edit2.text);
suma:=n1+n2;
edit3.text:=inttostr(suma)
end;