[martinsarubbi]

hola, alguien podra dar una mano?

tengo resuelto el tema de mandar parametros a un stored procedure.

desde delphi

type
cargarmolinete1: TADOStoredProc;
Edit4: TEdit;..... ,Edit10: TEdit

cargarmolinete1.Parameters.ParamByName('E_reason').Value:=edit4.Text ;
cargarmolinete1.Parameters.ParamByName('E_Name') .Value:=edit1.Text ;
cargarmolinete1.Parameters.ParamByName('E_IdCard').Value:=edit7.Text ;
cargarmolinete1.Parameters.ParamByName('E_DNI') .Value:=edit10.Text ;
cargarmolinete1.ExecProc;

y el Stored es

CREATE DEFINER=`root`@`localhost` PROCEDURE `Cargarmolinete1`(
in E_IDcard varchar (4),
In E_name varchar (32),
In E_Reason varchar (45),
In E_DNI varChar(25))
BEGIN
insert into `archivo`.`Molinete_1` (Dtime,IDcard,name,reason,dni) Value (now(),E_IdCard,E_Name,E_reason,E_DNI) ;
END

ahora necesitaria agregar un out al stored

CREATE DEFINER=`root`@`localhost` PROCEDURE `Cargarmolinete1`(
in E_IDcard varchar (4),
In E_name varchar (32),
In E_Reason varchar (45),
In E_DNI varChar(25)
Out E_Resultado varchar(1))
BEGIN
insert into `archivo`.`Molinete_1` (Dtime,IDcard,name,reason,dni) Value (now(),E_IdCard,E_Name,E_reason,E_DNI) ;
set E_resultado ='S'
END
la pregunta es

que debo agregar a
cargarmolinete1.Parameters.ParamByName('E_reason').Value:=edit4.Text ;
cargarmolinete1.Parameters.ParamByName('E_Name') .Value:=edit1.Text ;
cargarmolinete1.Parameters.ParamByName('E_IdCard').Value:=edit7.Text ;
cargarmolinete1.Parameters.ParamByName('E_DNI') .Value:=edit10.Text ;
cargarmolinete1.ExecProc;
para traer el valor de E_Resultado ?