关于ADOQUERY的问题！

Question

begin
 with query1 do
   begin
   parameters[0].value:=edit1.text;
   parameters[1].value:=edit2.text;
   open;
   if query1.Eof then
   label1.Caption:='密码或用户名出现错误，请重新登录'
   else
     begin
     label1.Caption:='欢迎您';
     query1.close;
     sql.Clear;
     sql.Add('insert into online(用户名)values(parameters[0].value)');
     execsql;
     end;
   close;
   end;
 end;首先进行身份验证，当正确后，将edit1中的内容插入到另外一个数据表(online)中。但上述代码在调试时出错，请指点，谢谢

Answer 1

提示什么错误？？另外你的sql语句有错。这样改
sql.text:='Insert into Online(用户名) values('''+Parameters[0].value+''')';query.execsql;

Answer 2

sql.text:='Insert into Online(用户名) values('''+edit1.text+''')';