关于动态字幕的简单问题!(20分)

  • 主题发起人 主题发起人 haibin_song
  • 开始时间 开始时间
H

haibin_song

Unregistered / Unconfirmed
GUEST, unregistred user!
在定时器的OnTimer事件中添加如下的代码:
Label1.Top:=Label1.Top-1 ;
if(Label1.Top<-Label1.Width-n) then {n 为一常数}
Label1.Top:=Panel1.Height;
就可以实现字幕向上移动并且可以循环显示。
要显示的内容在Label1.Caption中,为4行。
我的问题是:
1,为什么用 Label1.Top<-Label1.Width-n 作为判断条件,Label.Width 不是指示
Label显示内容的宽度吗?
2,我如何实现字幕向下循环滚动显示。
另外:有时候Label的Caption中的内容不能完全显示,要显示的内容的开头
(或结尾)不能显示,需要在Caption中的要显示的内容前面(或后面)加
几个空格符号才可以,为什么?

请高手指点!!

 
1.有问题,应是
if (Label1.Top <= -Label1.Height) then
2.把AutoSize改为False
 
1,你理解不误!Label.Width 是指它本身的宽度,不是内容(字符串)的宽度;
2,好像是DELPHI的一个BUG!你把Label.AutoSize设为False就好了
 
多人接受答案了。
 
后退
顶部