两层结构编程问题...

Question

在两层结构编程中,如何利用已知存储过程(AdoStoredProc1)
动态获得与之关联的已知的SQL SERVER端存储过程的参数?
写出过程:
  WITH AdoStoredProc1 DO
   Begin   End;

Answer 1

一个例子：
var
  tmpsp:TADOStoredProc;
begin
  tmpsp:=tadostoredproc.Create(nil);
  tmpsp.Connection:=mainfrm.acomain;
  tmpsp.ProcedureName:='test1';
  tmpsp.Parameters.CreateParameter('@param1',ftstring,pdinput,12,'Delphi'); 
  tmpsp.Prepared;
  tmpsp.ExecProc;  tmpsp.Close;
  tmpsp.Free;
end;