2,496
社区成员
发帖
与我相关
我的任务
分享初学delphi一个非常简单的查询问题
procedure TForm1.Button1Click(Sender: TObject);
begin
with Table1 do
begin
Open;
SetKey;
FieldValues['username']:=Edit1.Text;
if GotoKey then
ShowMessage('登录成功')
else
ShowMessage('登录失败');
end;
end;
为什么总是登录失败，字段名是对的，edit输入的内容也是username下存在的记录，我真的想不通。。。
begin
with Table1 do
begin
Open;
SetKey;
FieldValues['username']:=Edit1.Text;
if GotoKey then
ShowMessage('登录成功')
else
ShowMessage('登录失败');
end;
end;
为什么总是登录失败，字段名是对的，edit输入的内容也是username下存在的记录，我真的想不通。。。
...全文
请发表友善的回复…
发表回复
想到才能做到 2016-11-10
- 打赏
- 举报
你单步跟踪一下 GotoKey 里面的代码就明白为什么了。
lyhoo163 2016-10-26
- 打赏
- 举报
要判断一下表打开了吗？
支持中文哦 2016-10-26
- 打赏
- 举报
可以这么来，用TQuery.SQLText='Select count(*) From Table1 where userid = :id and password = :pwd ';
TQuery.ParaByname(':id'):=id号
TQuery.ParaByname(':ipwd):=密码
用参数化查询，避免sql注入
同时直接判断返回结果，避免频繁的数据库查询操作。
sixgj 2016-09-12
- 打赏
- 举报
trim 简单好用。
duanly7777 2016-09-11
- 打赏
- 举报
我也是初学者， trim(Edit1.Text;)试试
Frank6600 2016-09-10
- 打赏
- 举报
建议改用TQuery + SQL语句来判断
npkaida 2016-09-10
- 打赏
- 举报
SetKey 和 GotoKey 代码没贴出来，怎么知道为什么登录失败。
