Delphi: come ottenere il valore di un parametro di output di una stored procedure?

Question

Voglio creare in modo programmatico un SQLDataSet in Delphi e usarlo per eseguire una stored procedure e ottenere il valore di un parametro di output. Sembra facile ma non riesco a farlo funzionare.

Ecco una stored procedure muto in SQL Server:

CREATE PROCEDURE [dbo].getValue @x INT OUTPUT 
AS 
BEGIN 
    SET @x = 10; 
END 

Ora qui è una delle varianti che ho provato e non ha funzionato:

proc := TSQLDataSet.Create(nil); 
proc.SQLConnection := DefaultConnection; 
proc.CommandText := 'getValue'; 
proc.Params.CreateParam(ftInteger, '@x', ptOutput); 
proc.Params.ParamByName('@x').Value := 0; 
proc.ExecSQL(False); 
value := newIdProc.Params.ParamByName('@x').AsInteger; 

ho pensato che sarebbe stato facile , ma ci sono alcuni registredbugs intorno a questo problema.

Answer 1

sembra che funziona se si imposta il CommandType e SchemaName e non si crea il Param:

proc := TSQLDataSet.Create(nil); 
proc.SQLConnection := DefaultConnection; 

proc.CommandType := ctStoredProc; 
proc.SchemaName := 'dbo'; 
proc.CommandText := 'getValue'; 

proc.ExecSQL(False); 

value := proc.Params.ParamByName('@x').AsInteger;