J jinj123 Unregistered / Unconfirmed GUEST, unregistred user! 2008-02-28 #1 输入“用户名”判断数据库中时候存在该用户名，如果存在提示“该用户已经存在”，如果不存在，往数据库中添加.用delphi怎么实现？？？
L lanyaoshi Unregistered / Unconfirmed GUEST, unregistred user! 2008-02-28 #3 with ADOQuery1 do begin Close; SQL.Text := 'SELECT * FROM 用户表 WHERE 用户名=:用户名'; Parameters.ParamByName('用户名').Value := '张三'; Open; if RecordCount=0 then begin Append; FieldByName('').AsString := '张三'; Post; end else ShowMessage('该用户已经存在'); end;
with ADOQuery1 do begin Close; SQL.Text := 'SELECT * FROM 用户表 WHERE 用户名=:用户名'; Parameters.ParamByName('用户名').Value := '张三'; Open; if RecordCount=0 then begin Append; FieldByName('').AsString := '张三'; Post; end else ShowMessage('该用户已经存在'); end;
J jinj123 Unregistered / Unconfirmed GUEST, unregistred user! 2008-02-29 #5 问题已经解决，但是有一点不太明白，“用户名”为什么不用先声明！
B bainian_205 Unregistered / Unconfirmed GUEST, unregistred user! 2008-02-29 #6 在delphi中用户名前面加上冒号就表示了是变量，不必在前面定义
