Delphi中如何调用MYSQL的存储过程？

Question

Delphi中如何调用MYSQL的存储过程？
高手，能举个例子吗？
一个带传入参数的例子吗？可以吗？先谢谢了！

Answer 1

我只找到一个办法。
sqlstring:='call copychannel(2,5,''bbs'')';
ADOConnection1.Execute(sqlstring);你也可以把sqlstring用Query.add来执行但是要拿到存储过程的返回值就有点麻烦了。

Answer 2

在窗体中放置ADOConnection1,ADOStoredProc1和数据源DataSource1,并设置它们的基本属性值,特别注意的是ADOStoredProc1其属性(parameters,procedurename)你也可以动态地在程序里添加其属性.
procedure button1click(sender:tobject);
begin//假如以dbgrid网格显示
      adostoredproc1.prepared:=false;      adostoredproc1.parameters.parambyname('@aaa').value:=trim(edit1.text);//动态赋值给存储过程的参数(这里以edit编辑框为例),下同
      adostoredproc1.parameters.parambyname('@bbb').value:=trim(edit2.text);
      ... ...      adostoredproc1.prepared:=true;       adostoredproc1.open;
end;