几个问题？(100分)

1 在DELPHI5中动态的用存储过程的方法（即存储过程的组件是程序中建立的）
（ADO 与 BDE） 都需要有一些例子
2 当我打开一个项目的时候DELPHI报下面的错误
Exception EDBEngineError in module Vclbde50.bpl at 000C31E
Insufficient memory for this operation.
为什么？怎么解决？

期望大侠们给出答案 郁闷中ING

回答你第二个问题。因为你频繁使用数据库且没有正确关闭数据库资源，所以出现你所
说的那种情况。解决方法：将DELPHI关闭再打开就好了。

BDE例子
procedure TForm1.Button2Click(Sender: TObject);
var sp1:Tstoredproc;
begin
try
sp1:=Tstoredproc.Create(nil) ;
sp1.DatabaseName:='fff';
sp1.StoredProcName:='getid';
sp1.Params.CreateParam(ftString, '@name', ptInput);
sp1.Params.CreateParam(ftInteger, '@getid', ptOutput);
sp1.ParamByName('@name').value:='aaa';
sp1.ParamByName('@getid').value:=-1;
sp1.ExecProc;
showmessage(inttostr(sp1.parambyname('@getid').value));
finally
freeandnil(sp1);
end;
ADO例子
procedure TForm1.Button1Click(Sender: TObject);
var sp1:Tadostoredproc;
begin
try
sp1:=Tadostoredproc.Create(nil) ;
sp1.Connection:=adocn;
sp1.ProcedureName:='getid';
sp1.Parameters.Refresh;
sp1.Parameters.ParamByName('@name').value:='孔培';
sp1.Parameters.ParamByName('@getid').value:=-1;
sp1.ExecProc;
showmessage(inttostr(sp1.Parameters.parambyname('@getid').value));
finally
freeandnil(sp1);
end;
end;

第二个问题说不清楚重启一下是不是就好了

1.你的存储过程是返回数据集的吗？
2.重新启动DELPHI

谢谢52FREE兄