在delphi 中怎么利用sql中的存储过程的返回值

来源:百度知道 编辑:UC知道 时间:2024/05/16 08:32:13
我在sql中定义了一个存储过程,从而来验证用户名和用户密码是否存在,但是在delphi的应用窗口的登陆按钮中,若用户名和密码存在,若正确的画怎么利用存储过程的返回值来登陆主窗体啊?
谢谢各位,请大家帮忙
那么请问存储过程的返回值是多少呢

存储过程:
Create procedure proc_login
username varchar(20),
password varchar(20)
as
declare @result int
select @result=count(*) from table1 where user=@username and pass=@password
if @result=0
return 0
return 1
go

delphi代码:
var ret:integer;
......
with ADOStoredProc1 do
begin
Close;
ProcedureName:='proc_login';
Parameters.Clear;
Parameters.Refresh;
Parameters.ParamByName('@username').Value:= Edit1.text;
Parameters.ParamByName('@password').Value:= Edit2.text;
ExecProc;
ret:= Parameters.ParamByName('@return_value').Value;
end;
if ret=1 //用户名密码匹配
begin
//你想要的操作
end