本文整理自网络,侵删。
方法1: adoquery1.SQL.Clear; adoquery1.SQL.Add( 'select * from userlist '); adoquery1.Open; ACount:=adoquery1.RecordCount;
方法2:vara:integer;begin adoquery1.close adoquery1.SQL.Clear; adoquery1.SQL.Add( 'select count(*) from userlist '); adoquery1.Open;a:=adoquery1.fields[0].asinteger;end;
方法3:var s:String;with adoquery1 do begin Close; SQL.clear; SQL.add('select count(*) as a from userlist'); Open; end;s:=adoquery1.FieldByName('a').asstring;Showmessage(s);
相关阅读 >>
Delphi ansiendstext 用法之一(路径结尾自动加\)
更多相关阅读请进入《Delphi》频道 >>