T
tt123tt
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.Button1Click(Sender: TObject);
begin
ADOStoredProc1.Active :=false;
ADOStoredProc1.Parambyname('@aa'):=edit1.text; <<<<总是提示这行有错
ADOStoredProc1.ExecProc ;
ADOStoredProc1.Active :=true;
end;
自动加载时能正常执行过程,但执行上面事件就出错
begin
ADOStoredProc1.Active :=false;
ADOStoredProc1.Parambyname('@aa'):=edit1.text; <<<<总是提示这行有错
ADOStoredProc1.ExecProc ;
ADOStoredProc1.Active :=true;
end;
自动加载时能正常执行过程,但执行上面事件就出错