如何查看数据库的记录总数？如何在form上做垂直滚动的字幕？

Question

还有一个问题:在sql语句中如何使用通配符?

Answer 1

1.hansonboy是对的,
用数据集的recordcount属性,
或用SQL的select count(*) from...
3.用like '%'+..或like '-' 

Answer 2

谢上面几位。请帮忙解决最后一个问题：如何在form上做垂直滚动的字幕？
完后给分

Answer 3

RecordCount这个属性不太好。如果表中有大二进制字段，RecordCount属性返回值不准有时是-1

Answer 4

如果用用SQL的
    Query1.Close;
    Query1.SQL.Clear;
    Query1.SQL.Add('select count(*) from TB_User'); 
    Query1.SqL.Open.(或者 ExecSQL)用哪一个？
 
那返回的元组（记录）数，在delphi中怎么等看到??

Answer 5

ShowMessage( Query1.Fields[0].AsString ) ;

Answer 6

是不是让它动的。
从上至下。
你让那个label动就行了。
label有个属性可以设置多行的。

Answer 7

Nizvoo(瓦匠泥)同志:
  open不是返回有数据集的吗,select count(*) .. 也反回数据集吗?
还有
  这两种方法哪个好?

Answer 8

同意ping2000的看法
2.用循环吧

Answer 9

我认为
执行它一般是用作insert , update , alter table ..不作返回的。
Open是返回的你用select 就是要返回值。你试试看，感觉感觉就清楚了。

Answer 10

To skytears(苦)　 
你是哪一点不明白？

Answer 11

在窗体上加一个timer控件
procedure timertime(sender:tobject);
begin
if label1.top<top-10 then
  label1.top:=label1.top+10
else
  label1.top:=height-10;
end;

Answer 12

我告诉你Label如何设置成多行:在代码里写上:
  Label1.Caption:='我们'+#13+'出现了';这样就行了. 

Answer 13

做滚动字幕最简单的方法就是用RX控件中的TSecretPanel，设置Align属性为alClient，再在Lines中写几行，然后active:=True；就搞定了。要知道如何实现的，看看他的源码就行了。

Answer 14

RX控件中的TSecretPanel
在哪啊

Answer 15

你这样吧把你要写的文字写在Memo里.然后用一个Timer控件. 在Timer里写:   Memo.Top:=Memo.Top-1;自己调一下Timer的时间间隔  这样应该可以实现的.

Answer 16

RX控件你在www.51delphi.com下载一个吧！免费带源码！
TSecretPanel在RXTools面板中 

Answer 17

用BitBlt API
《Delphi5开发人员指南》上有一个例子，是一个滚动字幕的组件

Answer 18

recordcount不好，很容易返回无效的数值，还是定义一个整数变量，用指针query1.next统计一下比较准确
  例 car i:integer
    while not query1.eof do
       begin
         i:=i+1;
         query1.next;
       end;
        

Answer 19

zenartus(投入者) 　说得对但要加入一个query1.first;在while 前

Answer 20

1、"Select count(*) as RecordCount From Tablename" ==>Recordcount
2、
   a、用Additional页的控件ScrollBox完成滚动字幕
   b、使用Timer控件 自己用渐进的方式绘制文字
   c、直接使用第三方控件滚动(不推荐)

Answer 21

a、用Additional页的控件ScrollBox完成滚动字幕
b、使用Timer控件 自己用渐进的方式绘制文字
如何做？能否给个例子？谢谢