DELPHI 调用过程ADOStoredProc１的问题？？

Question

如果连接成功，参数消息会自动传送到ADOStoredProc中，所以只需要直接
 ADOStoredProc1.Parameters.ParamByName('@name').asstring:=
 ADOStoredProc1.Parameters.ParamByName('@j1').asinteger:=
 ADOStoredProc1.Parameters.ParamByName('@j2').asinteger:=

Answer 1

procedure tform1.button1click(sender:tobject);
var
  timestr:string;
begin
  storedproc1.prepare;
  ADOStoredProc1.Parameters.ParamByName('@j').asinteger:=1；
  storedproc1.execproc;
  timestr:=storedproc1.parambyname('@dt').asstring;
  storedproc1.unprepare;
  storedproc1.close;
  messagedlg(timestr,mtinformation,[mbyes,mbno],0);
end;