连接MYSQL的第三方工具DirectSQL[又称DirectMySQL]的使用问题[很有名的应该很多人用](30)

private FMysql: TMysqlClient; FResult: TMysqlResult;procedure seequery(Query:String; DB:string);var ex: boolean;beginform2.FMysql.select_db(DB);if assigned(form2.FResult) then beginif form2.FMysql.Status<>MYSQL_STATUS_READY thenShowMessage('00000000000000000000!');FreeAndNil(form2.FResult);end;form2.FResult := form2.FMysql.query(query, true, ex);if assigned(form2.FResult) then begin TableContent; end else if ex then else ShowMessage('Query fehlgeschlagen: '+form2.FMysql.LastError);end;seequery('SELECT * FROM `account` WHERE `acct`='''+getsaccid(results)+''' ;',form1.accdb.text);DirectMySQL如何判断查询语句返回为空？我想要判断如果seequery后没有找到数据的情况，方便做处理在SF上的地址是http://sourceforge.net/projects/directsql/

继续关注，有人知道吗？[]

关注 继续关注 。。