delphi操作存储过程.

dbms:mssqlserver2000存储过程如下：CREATEproctstPro@ageint,@theNumintoutputasselect@theNum=count(sn)fromswheresa=@ageGOdelphi中调用：varstr:string;