SQLConnection.Execute ... pregunta de Parámetros de Salida

[alquimista_gdl]

Hola,


Tengo el siguiente código que ejecuta una consulta de base de datos para determinar el número de registros que hay en una tabla; creo un parámetro de salida para obtener el resultado del "count(*)", más no estoy recibiendo nada del parámetro:

Código Delphi [-]
procedure TForm1.Button_testClick(Sender: TObject);
var
  stmtParams: TParams;

begin

  stmtParams := TParams.Create;
  stmtParams.CreateParam(ftInteger, 'cuenta', ptOutput);
  dm.SQLConnection_sdi.Open;
  dm.SQLConnection_sdi.Execute('select count(*) as cuenta from regoper', stmtParams);

  Self.Edit_resultado.Text:= stmtParams.ParamByName('cuenta').AsString

end;

Me hará falta algo?

Gracias,
Guillermo