发一个 Lazarus 写的图片过渡效果，改自网上 Delphi 的例子

该用户从未签到

发表于 2011-3-14 09:02:52 | 显示全部楼层 |阅读模式

大家都知道，由于支持跨平台的原因，Lazarus 的 TBitmap 没有 ScanLine 成员（和设备有关）。
所以参考 Wiki 修改了这个例子。

截图(大概效果)：

Lazarus 例子源码：

参与人数 1	威望 +10	收起理由
猫工	+ 10	优秀文章，支持！n神马都是浮云

*滑块验证:

本版积分规则回帖后跳转到最后一页

GMT+8, 2025-5-2 18:18 , Processed in 0.057931 second(s), 14 queries , Redis On.

		自动登录	找回密码
密码			立即注册（注册审核可向QQ群索取）