delphi6如何调用SQL SERVER 2000中自定义的存储过程?马上给风 delphi6如何调用SQL SERVER 2000中自定义的存储过程? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 storedproc里面调用,或者用query的SQL 里面写语句,就想在查询分析器里面一样。 with StoredProc1 do begin StoredProc1.Close; StoredProc1.StoredProcName:='你定义的存储过程名'; params.Clear; params.CreateParam(FTSTRING,'@ANI',PTINPUT); //传入所有需要参数 params.CreateParam(FTSTRING,'@USER_NO',PTOUTPUT); params.CreateParam(FTINTEGER,'@RET',PTOUTPUT); ParamByName('@ANI').ASSTRING:=EDIT2.Text; ExecProc; STOREDPROC1.GetResults; LABEL16.CAPTION:=PARAMBYNAME('@RET').ASSTRING; //取出返回值 LABEL17.CAPTION:=ParamByName('@USER_NO').ASSTRING; Edit4.Text:=ParamByName('@USER_NO').ASSTRING; close; end; 使用全局变量遇到的一个问题 请教下大家 如何动态加载DLL文件,实现如下功能 初学者问:有控件象饼形图那样显示数据间的比例吗?(急) 高分紧急求助:关于多线程问题的求助!!!! Delphi调用VC的DLL问题(带参数)! 请问如何用代码实现“启用”与“禁用”“本地连接” 100分求Canvas.DrawFocusRect()的详细资料!!! Delphi2007 的Rave? 求助:解决存储过程超期的问题。在线等待。 请问如何将类似于¥1,049,406.06的小写金额转换为大写?算法如何?请附上源代码! 郁闷,散分,我已七窍流血... 一个数据库问题????
begin
StoredProc1.Close;
StoredProc1.StoredProcName:='你定义的存储过程名';
params.Clear;
params.CreateParam(FTSTRING,'@ANI',PTINPUT); //传入所有需要参数
params.CreateParam(FTSTRING,'@USER_NO',PTOUTPUT);
params.CreateParam(FTINTEGER,'@RET',PTOUTPUT);
ParamByName('@ANI').ASSTRING:=EDIT2.Text;
ExecProc;
STOREDPROC1.GetResults;
LABEL16.CAPTION:=PARAMBYNAME('@RET').ASSTRING; //取出返回值
LABEL17.CAPTION:=ParamByName('@USER_NO').ASSTRING;
Edit4.Text:=ParamByName('@USER_NO').ASSTRING;
close;
end;