VB 轻量级GIFl动画图片显示用户控件

Ineverleft · 发表于 2020-12-19 21:24:40

本帖最后由 Ineverleft 于 2021-1-8 15:06 编辑

QQ截图20201219210507.png

本源代码属于轻量级的GIF图片框控件，纯代码实现，采用用户控件方式，而非OCX控件。生成EXE文件大小仅100kb，且不需要携带任何支持文件，可以说是目前全网最干爽的GIF按钮控件了，没有之一！
一款具有完整功能的显示GIF图片的开源控件，显示速度不错。无窗体，数据流小而且属于轻量级，可以任意加载到自己的程序中直接使用。支持播放、暂停、单帧步进。适合显示动画帧数不是很多的GIF动画，很流畅。另外还支持远程网络位置显示GIF，类似一些加广告的软件中一些动画广告。

停止播放GIF动画代码：
GIF1.Action = gfaStop

暂停播放GIF动画代码：
GIF1.Action = gfaPause

单帧步进GIF动画代码：
GIF1.Action = gfaForward

播放GIF动画代码：
GIF1.Action = gfaPlay

从网络加载GIF动画并播放代码：
GIF1.LoadGIF_Remote "http://bbs.wk78.com/comiis_jddz/comiis_logo.gif"
' 可以使用远程服务器路径，如： \\myserver\my pictures\mygif.gif 或者其他硬盘路径

Gif_Demo.rar (66.14 KB, 下载次数: 40)

		自动登录	找回密码
密码			立即注册