一个翻页的问题，有分。 ( 积分: 50 )

红

红蚂蚁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-24

• #1

VOD的歌星页面，UP向上翻DOWN向下翻，我想在向下翻尽时又回到前头重来，向上翻尽时又从最后一页向上翻，如何实现？ 现在的情况是向下翻尽时就不能向下了只能向上翻，向上翻尽时也不能动了只能向下翻，我想让向上或向下都能循环。
可以示范一下代码吗

 

红

红蚂蚁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-24

• #2

VOD的歌星页面，UP向上翻DOWN向下翻，我想在向下翻尽时又回到前头重来，向上翻尽时又从最后一页向上翻，如何实现？ 现在的情况是向下翻尽时就不能向下了只能向上翻，向上翻尽时也不能动了只能向下翻，我想让向上或向下都能循环。
可以示范一下代码吗

 

H

hs-kill

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-24

• #3

...
1是用链表，不过这个需要改程序结构

2是判断是否首或尾，比如
procedure getnext(n:integer); //n为要显示的页
begin
if n>0endpage then
showpage(1) //如果超过最后一页则显示第1页
else
showpage; //否则显示当前页
end;

 

红

红蚂蚁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-26

• #4

接受答案了.