窗体间的动画切换。 (300分)

  • 主题发起人 主题发起人 程云
  • 开始时间 开始时间

程云

Unregistered / Unconfirmed
GUEST, unregistred user!
如题。
有套控件包叫BilleniumEffects 3.1
可去
http://www.51delphi.com/delphi/soft?type=界面
处下载。

看一下其中的示例就知道,它在这方面作的相当不错。
我也有一个思路完成这些,但会作的很粗糟。

想看一下这套控件是怎么作的,
但可惜的是这套控件没有源码,

所以,特来请教各高手们。
希望给我点指点。
 
BilleniumEffects 3.1

我以前查过,就这个控件最好了
 
to laohe:
同感,
只是它没有源码呀,我是想看它是如何实现的,
然后引入到自己的软件中。
 
效果还挺好,就是不太稳定,常常会整个程序死在那里。[:(]
可惜它不提供源码,没得看

laohe: 有其他提供源码的相似控件包没有?
 
大家应该知道 TForm.GetFormImage;
,可以获得窗口的映像。
这样就有办法了。

1.显示窗口的初始样式,存入 MemBitmap1
2.阻止窗口对 WM_PAINT 消息的处理 , 改变窗体样式。
3.利用 GetFormImage 将新的影像存入 MemBitmap2
4.利用TIMER或循环在 Canvas 上画 MemBitmap1 到 MemBitmap2 的变化过程。
5.恢复WM_PAINT消息处理

另外,那个漩涡效果是用个一个漩涡灰度图利用亮度变化与需显示的内容做的 MASK .
 
程云,你以前写了一个窗体的动画,我也写了一个,但是非常闪烁,不知何故?
 
程云怎么没有动静了?
 
老丁可有心得?
 
ABCFormPanel是一个将Form显示到一个Panel的组件,整个切换也是动态的,效果不错,有源吗
 
后退
顶部