制作数据显示窗口：能否自动的间隔一段时间更新显示的数据？该怎么做？(100分)

X

xinphoebe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-12

• #1

比如说：程序初始化时显示前1-10条数据，隔一段时间以后，自动显示第11-20条数据。
应该怎么办？

 

A

armyjiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-12

• #2

设置定时器，使用消息机制来控制数据显示窗口。
比如说控制显示窗口进行向下滚动。

 

白

白海森

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-12

• #3

显示前十条纪录 : select top 10 * from table1

 

S

sgs125

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-12

• #4

同意armyjiang,用计时器，然后，定期刷新库

 

X

xinphoebe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #5

真的，多谢！可惜，我是初学者，能否说的详细些呢？
或者，在哪里能找到定时器和消息机制的资料？
多谢！

 

X

xinphoebe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #6

还有，如何用timer控件实现三个不同的数据表轮流的循环显示呢？

 

P

pcc_mmz1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #7

用一个定时器Timer1，用一个全局变量就可以了。
var
showNO :integer;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Inc(showNO,5000);
if showNO div 5000=0 then //假设每5秒轮流显示一个数据表的数据。
显示第一个表的数据
if showNO div 5000=1 then
显示第二个表的数据
if showNO div 5000=2 then
begin
显示第三个表的数据;
Showno :=-5000;
end;
end;

 

F

fshrq1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #8

11-20条怎样显示

 

S

smallbs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-13

• #9

11-20条显示的问题，详尽这个帖子：
http://www.delphibbs.com/delphibbs/dispq.asp?LID=1319148

 

X

xinphoebe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-14

• #10

多人接受答案了。

 

X

xinphoebe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-14

• #11

对不起各位，我执行pcc_mmz1您写的代码，但是只能轮流显示后两个表。
怎么回事啊？

 

Y

YJT-117

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-21

• #12

我知道你是意思是自動翻頁啦,給分吧
procedure TForm1.Timer2Timer(Sender: TObject);
var I :INTEGER;
begin
i:= ADODataSet1.RecNo;
I:=I+10;
ADODataSet1.MoveBy(I);
end;