首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

delphi连接查询MYSQL的有关问题

2012-05-27 
delphi连接查询MYSQL的问题我是用 delphi7 +mysql的数据库数据库连接的控件有 AdoQuery1AdoConnection1Dat

delphi连接查询MYSQL的问题
我是用 delphi7 +mysql的数据库

数据库连接的控件有 AdoQuery1 AdoConnection1 DataSource1 DBGrid1

数据库连接的部分是 

AdoQuery1.Connection := AdoConnection1;
DBGrid1.DataSource := DataSource1;
DataSource1.DataSet := AdoQuery1;

数据库之间的连接已经OK了

连接DBGRID的查询结果也会了 但是如果不显示出查询结果 应该怎么写 我刚才百度了一下 好像是用 FieldValues

窗体登录的部分的具体查询代码 我就不会了 

就是 登录的账号(edit1.text) 登录的密码(edit2.text) 如何在数据库中查询是否正确

就是查询数据库中的 账号密码是否匹配

if trim(edit1.text) <> '' and trim(edit2.text) <>'' then 
下面的 不会了 ~~~

小弟初学 大家不要见笑。

[解决办法]
AdoQuery1.SQL.Add('select * from 用户名 where 账号='+quotedstr(trim(quotedstr(edit1,text))+' and 密码='quotedstr(trim(edit2.text))+';');

AdoQuery1.close;
AdoQuery1.open;
[解决办法]
procedure TfrmForm1.Button1Click(Sender: TObject);
begin
 if edit1.text<>'' then
begin
ADOQuery1.Active:=False;
ADOQuery1.SQL.Text:='Select 字段名1,字段名2,上字段名3,字段名4 From 表名 where 字段名='+trim(edit1.Text);
ADOQuery1.Active:=True;
ChZhye:=ADOQuery1.fieldbyname('字段名').AsString;
button2.Enabled:=true;
Edit2.Enabled:=true;
Edit2.SetFocus
end
end;

热点排行