Gracias lgarcia...- Aún no termino...de resolver el problema..., pero las sugerencias que me diste..me acotaron la busqueda...
Efectivamente..mi procedimiento almacenado es como decias, este es el codigo:
---------------------------------------------------------------------
CREATE PROCEDURE sp_prueba_consul1
@id int,
@nombresel varchar(50) output
AS
BEGIN
SELECT @nombresel = nombre FROM prueba WHERE id = @id
END
GO
---------------------------------------------------------------------
y este es mi codigo modificado según me indicaste:
procedure TForm1.Button4Click(Sender: TObject);
begin
try
with ADOStoredProc2 do
begin
Open;
Parameters.ParamValues ['@id']:= StrToInt(Edit3.Text);
end;
DataSource1.DataSet.Active:= True;
edit4.Text:= ADOStoredProc2.Parameters.ParamValues['@nombresel'];
ADOStoredProc2.close;
except
on E:exception do
showmessage('Ha ocurrido un error: ' +e.Message);
end;
end;
--------------------------------------------------------------------
Pero cuando lo ejecuto y la paso el parametro ID para que me devuelva el nombre me dice el error : AdoStoredProc2: CommandText Does Not Return a Result Set - que puede ser???
Muchas Gracias
|