这样添加用户，行不行？源码如下。(10分)

with frmdm.qrylogin do
begin
close;
sql.clear;
sql.add('EXEC sp_addlogin :user,assword');
parameters.ParamByName('user').Value :=edit1.Text ;
parameters.ParamByName('password').Value :=edit2.Text;
execsql;
close;
sql.clear;
sql.add('EXEC sp_adduser :user');
parameters.parambyname('user').value:=edit1.text;
execsql;
end;

好象不用“EXEC”吧[8D]，你运行一下就结果了

ok

正确，我在程序里也是这么处理的。