新手报到顺便求教

用sql2000，delphi7：用adoconnection连了数据库的一个表，然后用adotable、datasource连上去做一个用户登录界面```想利用if语句来实现 已有注册用户名则提示已注册、若没注册用户则提示还没注册 的判断，现在只是测试相同用户名弹出message都没反应```如图，请各位指教

顶帖

我一般AdoConnection AdoQuery

举个小例子：

假定你窗体上有三个Edit,分别是Edit1,Edit2,Edit3.对应输入的是用户名，密码，确认密码

那么你首先可以通过查询语句检查输入的用户名是否被注册！

AdoQuery1.close;
AdoQuery1.sql.clear;
AdoQuery1.sql.add('select * from 表名 where 用户名='''+ Edit1.Text+'''');
AdoQuery1.open;
if AdoQuery1.recordCount >0 then
begin
  showmessage('您输入的用户名已被注册！');
end else
begin
showmessage('您输入的用户名未被注册！');

end;

同样的，如果要登录的话，方法跟查询是否注册一样，只不过SQL语句后面多了一个密码＝'''+Edit2.Text+''' 而已，然后同样是根据查询出来的记录来判断，如果记录＝０，说明没查到，也就是输入的资料不对，如果大于０，那表示登录信息输入是正确的

希望能帮到你！

假设你的表t有2个字段(UID,PW)
Form1Create事件写:
with   adotable   do
begin
    close;
    sql.text:= 'select   *   from   t ';  
    open;
end;

注册按扭button1Click事件写:
with   adotable   do
begin
    if   not   locate( 'UID ',Edit1.Text,[])   then
    begin
        append;
        fieldbyname( 'UID ').asstring:=Edit1.Text;
        fieldbyname( 'PW ').asstring:=Edit2.Text;
        post;
        showmessage( '注册成功！ ')
    end   els
          showmessage( '您输入的用户名已被注册！ ')
end;

登陆按扭button2Click事件写:
if   not   locate( 'UID;PW ',varArrayOf([Edit1.Text,Edit2.text]),[])   then
      showmessage( '用户名或者密码不正确! ')
else
      showmessage( '验证通过,做其它事吧! ');