竟然这个问题搞不定,大伙帮忙看看,如何让form的标题从右向左滚动?(50分)

  • 主题发起人 主题发起人 一少
  • 开始时间 开始时间

一少

Unregistered / Unconfirmed
GUEST, unregistred user!
如何让form的标题从右向左滚动
 
最本的方法,timer没一段时间,就修改一下form 的caption
hoho
 
这个方法显示的字太疆硬,有没有让文字平滑滚动的办法
 
用withdraw的笨很有效,我也曾用过。
将form.caption:=‘ ’+CAPTION;
用timer改变空格的多少就可以了。
 
楼上的兄弟,加空格是一种好的方法,但是窗体大小改变怎么办?所以我想补充一下,
在窗体的绘制事件里面获得当前您的caption的宽度Form1->Canvas->TextWidth("我的标题栏");
然后根据窗体的宽度算出需要加入多少个空格,再在timer事件里依次递减空格的数目!
 
处理一个非客户区的重绘制消息,名字是什么我忘记了,你查查。
 
Canvas.TextOut(x,4,FTableName);
 
谢谢各位,我想知道有没有让form标题的文字平滑移动的办法
 
自己做个标题,愿意怎么画就怎么画.
 
用timer只要设置好interval属性应该能满足你的要求了,我试过的,还比较平滑
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部