Delphi calls the SQL-Server2000 stored procedure

Source:

Http://blog.9cbs.net/hansbj/archive/2004/12/10/211907.aspx

How Delphi calls the SQL stored procedure and get the result

AdoStoredProc1.Close;

AdocedProc1.ProcedureName: = 'sp_thchl';

AdoStoredProc1.Parameters.clear;

AdoStoredProc1.Parameters.createParameter ('out', ftinteger, pdoutput, 1, 1);

AdoStoredProc1.execproc;

Edit1.text: = adoStoredProc1.Parameters [0] .value;