Delphi - Recibir String, insertarlo en Funcion?

Seguramente es bastante pavo, pero me vengo rompiendo el mate hace dias y no lo logro..

La pregunta es la siguiente, yo quiero recibir un String de un Edit, e insertarlo en una funcion, digamos:

Edit1.Text := exp(-x);

y yo quiero hacer

function hola(x):double;
begin
hola:=Edit1.Text;
end;

la idea seria que evalua el valor entrado en la funcion dada en el edit.

function hola(x):double;
begin
hola:=Edit1.Text;
end;

Una función siempre tiene que devolver un resultado y la tuya no devuelve ninguno, por lo que hay que añadir un result. Hay muchas maneras de hacerlo pero esto podria ser una

function hola(x):double;
var
Operaciones:Extended;
begin
Result:=0.00;
Aqui hago lo que quiero con al valor X pasado a la funcion y el resultado de las operaciones lo devuelvo asi
Operaciones:=((X*78) div 33) + 11;
Result:=Operaciones;
end;

Edit1.text:=floattostr(hola(valor X));

Suerte