100分求delphi连接数据库问题

来源:百度知道 编辑:UC知道 时间:2024/05/21 09:34:56
我做了一个登陆,每完成,代码如下:
procedure TForm1.Button1Click(Sender: TObject);
begin
sql:= 'select * from loginInfo where username='''+Edit1.Text+'''';
Form1.ADODataSet1.CommandText:=sql;
ADODataSet1.Active:=true;
if ADODataSet1.RecordCount<>0 then
begin
sql:= 'select * from loginInfo where username='''+Edit2.Text+''''
ADODataSet1.CommandText:=sql
if ADODataSet1.RecordCount<>0 then
ShowMessage('登陆成功')
else
ShowMessage('密码不正确')
else
ShowMessage('用户名不存在')
end;
end;
现在还没有测试,我知道肯定不对,不知道大家能不能看懂,我把大概意思说一下,就是有两个文本框,分别接收账号和密码,然后去数据库查询,现查询有没有这个账号,如果有,再查询密码,密码也正确的话,登陆成功,我是DELPHI新手,我是自学的,想问高手几个问题:
1.我最开始不知道怎么连接数据库,后来好不容易找到了一个例子,他里面的查询是Form1.ADODataSet1.CommandText:sql这么写的,可是我看很多人都用ADOQuery1: TADOQuery;
adoquery1.Close;

1、Command嘛,命令嘛。Query一般返回RecordSet,ADODataset的目的是为了转化成CS方便。其实呢,一样的。真要转成CS结构的,还不全部重写?难道改一个控件就什么都OK了吗?
2、
新建一个Form
在成功时。。。
Form2.Create(nil);
try
Form2.ShowModal;
finally
Form2.Free;
end;

你的那个帖子的URL在哪里?