2,497
社区成员
发帖
与我相关
我的任务
分享
userName := editRegUserName.Text;
passWord := editRegPwd.Text;
sql1 := 'insert into userinfo (username,password) values(:a,:b)';
ADOQuery.close;
ADOQuery.SQL.Clear;
ADOQuery.sql.add(sql1);
ADOQuery.parameters.ParamByName('a').Value:=userName;
ADOQuery.parameters.ParamByName('b').Value:=passWord;
ADOQuery.execsql;
with ADOQuery do
begin
Close;
SQL.Clear;
SQL.Add('insert into userinfo (username,password) values ([editRegUserName.Text][editRegUserName.Text])');
ExecSQL;
update;
end;
SQL.Add('insert into userinfo (username,password) values ([editRegUserName.Text],[editRegUserName.Text])');