我用Delphi连接 Access 数据库读取里面的信息与我的 Dbedit 的内容匹配

Question

我用Delphi连接 Access 数据库读取里面的信息与我的 Dbedit 的内容匹配，如果正确则跳转到下一个Form如何写呢~ 小弟菜~ 各位大大表笑话啊主要是登录的时候验证用户名和密码

Answer 1

/////检测输入的是否正确
  sql:='select * from db_user where user_name='''+
       edit1.text+''''+
       ' and user_password='''+edit2.text+'''';
  query.Close;
  query.SQL.Text:=sql;
  query.Open;
  if query.RecordCount>=1 then
  begin
    下一个form.show;
  end;

Answer 2

dbedit是数据敏感控件，其本身就是和db链接的，你是什么意思呢？

Answer 3

if pos('''',edit1.Text)>0 then exit;
   query.Close;
   query.SQL.Clear;
   query.SQL.Add('select * from T_user  ') ;
   query.sql.Add(format('where name=''%s'' and password=''%s'''[edit1.text,edit2.text]));
   query.Open;
   if query.IsEmpty then
    begin
    showmessage('warning!'+#13+'error');
    exit;
   end;
   i:=1;
   self.hide;
   showmessage('欢迎使用访系统');   edit1.Clear;
   edit2.Clear;

Answer 4

就是两个DBedit 一个是填写用户名一个填写密码  点击Button 与 连接的ACCESS 内的用户表连接 验证填写的用户名和密码是否正确，正确就跳转到下一个Form我现在是想知道 Button里的怎么写，另外还需要那些 控件谢谢啦

Answer 5

query.Close;
query.sql.clear;
query.sql.add('select * from db_user where user_name=:a and password=:b');
query.Parameters.ParamByName('a').Value:=dbedit1.text;
query.Parameters.ParamByName('b').Value:=dbedit2.text;query.open;
if query.RecordCount>=1 then
  begin
    下一个form.show;
  end;