num1:=edit1.text;
num2:=edit2.text;
num3:=edit3.text;
num4:=edit4.text;
num5:=edit5.text; ADOQuery2.Close;
ADOQuery2.SQL.Clear ;
ADOQuery2.SQL.Add ('insert into users(xingming)');
ADOQuery2.SQL.Add ('values('''+num1+''')');
ADOQuery2.ExecSQL;//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~这里要用ExecSQL
ADOQuery2.Close;
num2:=edit2.text;
num3:=edit3.text;
num4:=edit4.text;
num5:=edit5.text; ADOQuery2.Close;
ADOQuery2.SQL.Clear ;
ADOQuery2.SQL.Add ('insert into users(xingming)');
ADOQuery2.SQL.Add ('values('''+num1+''')');
ADOQuery2.ExecSQL;//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~这里要用ExecSQL
ADOQuery2.Close;
ADOQuery2.Close;
ADOQuery2.SQL.Clear ;
ADOQuery2.SQL.Add ('insert into users(xingming)');
ADOQuery2.SQL.Add ('values('''+num1+''')');
ADOQuery2.ExecSQL;//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~这里要用ExecSQL
ADOQuery2.Close;