|
| 盒子资源分类 |
![]() |
|
|
|
|
| TScrollText For D5/D6/BCB5/BCB6 (自动字幕控件) |
![]() |
| 关键字：TScrollText TCustomLabel 字幕 滚动 文字 |
| 来 自：原创 |
| 平 台：Win9x,Win2k/XP/NT,Win2003 |
下载所需：0 火柴 |
| 深浅度：初级 |
完成时间：2005/2/19 |
| 发布者：iamdream |
发布时间：2005/2/21 |
| 编辑器：D5/D6/BCB5/BCB6 |
语 种：简体中文 |
| 分 类：标签 |
下载浏览：3177/19914 |
|
|
|
|
|
前些天在论坛上看到某位老兄在寻找“自动字幕”控件，当时我手头上有一个两年前写的滚动字幕控件，不过只能由右向左滚动，而且还有问题；我也找到过一个文字滚动控件，但效果也不是太好。那时我就想自已重写一个，恰好第二天晚上灵感忽来，我发现可以利用TCustomLabel来实现，于是便有了这个TScrollText“自动字幕”控件。
要注意的是，如果你觉得闪动比较厉害，那就将ScrollText的父控件之DoubleBuffered属性置为True，例如将ScrollText放在窗体上，则在窗体创建的时候加上DoubleBuffered:=True即可。
其实很多时候换个角度思考问题，往往有意想不到的收获^o^
我传上来的包里有Delphi6及CBuilder60的安装包，实际上所附的ScrollText源码支持D5/D6/BCB5/BCB6，D7估计也是支持的，不过我没试过。
为简单起见，该控件默认安装在Standard面板上。
祝你愉快！
EMail: iamdream@yeah.net
sky 2005.2.19 晚写于上海 |
| 本站原创作品，未经作者许可，严禁任何方式转载；转载作品，如果侵犯了您的权益，请联系我们！ |
| 相关文章 |
|
![]() |
|
|
| 相关评论 |
![]() |
|
共有评论14条
当前显示最后6条评论
|
| sunsmile23 |
2005/12/25 13:21:04 |
| 谢谢！ |
| iamdream |
2006/4/9 12:55:11 |
对了，在D2005中得在Create函数中的inherited Create;后加上以下代码：
if (Parent = nil) and (AOwner is TWinControl) then
Parent := TWinControl(AOwner); |
| pzx0313 |
2006/5/24 21:02:51 |
我感觉也很好啊呵呵
谢谢拉 |
| 278917686 |
2006/6/9 0:25:25 |
| 谢谢了 |
| sxwy |
2007/1/11 15:10:48 |
| 信息过多时(200条向上移动,设置为50,每次一个像素点)CPU消耗过多,最后会一直100%, |
| heyongjie |
2009/8/5 12:57:52 |
| 太占CPU资源 |
| 我要发表评论 |
查看全部评论 |
|
|
|
盒子资源分类大树
