delphi链接数据库

Question

谁能帮我看看这是什么问题啊，初学delphi请大家帮帮吗

Answer 1

http://album.hi.csdn.net/app_uploads/shirely2009/20090714/153142218.t.png
这个图片在我空间了，我不知道怎么把它弄上去，谢谢了

Answer 2

http://album.hi.csdn.net/views/photo/292741
这个应该可以吧

Answer 3

应当是要查询的数据里面没有'admin'这一列吧 

Answer 4

列名admin无效，检查看看是否存在这个列，你用的是什么数据库？

Answer 5

我用的是SQLserver.admin是我输入的用户名，登录界面点击登陆按钮的代码如下
procedure TfrmLogin.Button1Click(Sender: TObject);
begin
try
with data do
begin
ADOLogin.SQL.clear;
ADOLogin.SQL.Add('select * from users where UserName="'+username.Text +'"');
ADOConnectLogin.Connected:=true;
ADOLogin.open;
end
except
begin
MessageDlg('Connect to Database Error!',mtError,[mbok],0);
close;      //关闭窗口
endend;//endtry
if data.ADOLogin.recordCount=1 then    {如果找到用户}
if data.ADOLogin['UserPwd']=password.Text then
begin
flag:=true;//密码正确
end
else
begin
flag:=false;{密码不正确}
MessageDlg('password Error!',mtError,[mbok],0);
end
else begin
flag:=False;  {没有找到用户}
MessageDlg('username Error!',mtError,[mbok],0);
end;   //endif
close;
 end;end.
但这里面不知道有错误没

Answer 6

ADOLogin.SQL.Add('select * from users where UserName='+QuotedStr(Trim(username.Text)) );