Незнаю как в Delphi, но сильно подозреваю что примерно тоже самое (говорим про ADO!), а в VB наиболее быстрый способ, корректно работающий как с входными так и с выходными параметрами заключается в том, чтобы клиент не запрашивал у сервера тип и имя параметра (т.е. все делается 'ручками'):

Create Procedure TestProc @Parameter1 Int, @Parameter2 Int, @Parameter3 Int Output
As
Set Nocount On
Set @Parameter3 = @Parameter1 + @Parameter2
Return



Dim cmd As New Command, prm As New Parameter
cmd.ActiveConnection = CurrentProject.Connection
cmd.CommandText = "TestProc"
cmd.CommandType = adCmdStoredProc
Set prm = cmd.CreateParameter("@Parameter1", adInteger, , , 123)
cmd.Parameters.Append prm
Set prm = cmd.CreateParameter("@Parameter2", adInteger, , , 456)
cmd.Parameters.Append prm
Set prm = cmd.CreateParameter("@Parameter2", adInteger, adParamOutput)
cmd.Parameters.Append prm
cmd.Execute
MsgBox prm
Set prm = Nothing
Set cmd = Nothing