var x:integer;
x:=query1.recordcount;
x:=query1.recordcount;
解决方案 »
- 窗口最大化问题
- 退出程序很难吗?为什么我这么做是不行的,应该怎么做呢?
- cxGridDBTableView的一个问题???
- *** 高分求助:关于Delphi写的WebService在Windows2003的部署问题 ***
- SQL如何访问,不在SERVER系统下.
- 请大家帮忙起个公司名
- 急:ADO客户端连接问题 出现的错误是“[DBNMPNTW]ConnectionOpen(CreateFile))”
- 请教高手思路:关于唱票,很急
- 如何动态移动TChart中的Series,类似于点属性SeriesList后的样子
- 各位大神。请问这段C++代码翻译成Delphi 是什么?
- Incompatible types: 'Word2000.TWordApplication' and 'WordXP.TWordApplication'
- 如何加快OleContainer载入Word文件的速度?╭●ō●╮
或者
select count(*) from query1的sql语句
如果有请用 select count(*) from table
tt:integer;select count(*) as number from 你的表
open;
tt:=fieldbyname('number').asinteger;
就OK了啊
x:=Query1.recordcount
function getct(adataset:tdataset):integer
begin
with adataset do
begin
disablecontrols;
first;
ct:=0;
while not eof do
begin
inc(ct);
next;
end;
enablecontrols;
end;
result:=ct;
end;