文字自动上滚

allexit 2000-08-19 09:17:00
其原理类似于拉洋片。底下是一个panal(面积例如是X:100 Y:100),在上面放置memo(面积例如是X:100 Y:300)。将memo的top属性设为0,然后不停的减一就行了。
如不明白,email me.
allexit@fm365.com
...全文
108 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
icefireren 2000-08-23
  • 打赏
  • 举报
回复
单独用定时器太耗资源,最好是使用滚动标签,这个标签组件网上有,请自己找!
bitter 2000-08-21
  • 打赏
  • 举报
回复
很多控件都有类似的scrolling text.
bupack,coolcontrol206.....
allexit 2000-08-20
  • 打赏
  • 举报
回复
设一个定时器,然后在onTime中实现。
andymei 2000-08-20
  • 打赏
  • 举报
回复
SendMessage实现

828

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 非技术区
社区管理员
  • 非技术区社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧