ADOQuery1.Recordcount>0;
或者:
not ADOQuery1.IsEmpty
或者:
not ADOQuery1.IsEmpty
解决方案 »
- 难道是系统问题(debugger kernel BORDBK.DLL is missing or not registered)
- 图片处理的问题
- 如何让TStringGrid 的cell高亮显示?-----告知答案绝对给分
- 请问如何使自己的程序永远在桌面上最前面
- 小问题,送分
- 关于内存映射文件保持一致性的问题,高手请进,在线等待!!!
- 怎样将image上已画好的图象清除?
- 急求文件传输程序。
- ??!!!!!!!!
- 谁有InfoPower2000控件的安装密码?
- 高手救急!Quick Report打印问题!400分酬谢!
- querysql.sql.text:='select @record:=count(ID) from tablename'怎样传递到mysql
或
adoquery.open;
adoquery.first;
adoquery.eof=false;
begin
……
end;
或者
if isempty(table1)
……
我的 代码小小的改了一下 begin //1
ss1:=PassWordDlg.UserName.Text;
ss2:=PassWordDlg.Password.Text;
with ADOQuery1 do begin //2
Close;
SQL.clear;
SQL.Add('select * from password ');
SQL.Add('where username='''+ss1+''' and password='''+ss2+'''');
//if ADOQuery1.Prepared=false then ADOQuery1.Prepare;
Open;
if Recordcount>0或是其他的 方法 then
begin
CmpTimes:=100;???????????
end
else
begin//3
CmpTimes:=CmpTimes+1;
if CmpTimes>3 then
MainForm.Close
else
messageDlg('密码错误,请重新输入,一共三次机会!',mtWarning,[mbOk],0);
end;//3
end;//2
end //1