AnimationControl

动画控制

Visual Basic 6 的 ActiveX 控件，可用于显示 AVI 或 GIF 动画。

我在 2006 年开发了这个 ActiveX 控件，并定期更新它，直到 2016 年。目前我没有兴趣再维护这个项目，但我认为代码可能对其他人有用。

进行更改之前

如果更改代码并部署二进制文件，请记住 ActiveX 控件是 COM 组件，因此只要不更改 COM 对象（即 ActiveX 控件的公共类名和 GUID），就应该保持二进制兼容。否则，使用这些组件的人很可能会陷入著名的 COM 地狱。

依赖关系

您将需要 Microsoft Windows 10 SDK、ATL 和 WTL 10。

ATL 所需的更改

某些版本的 ATL 在AtlIPersistPropertyBag_Load中存在导致崩溃的错误。在文件 atlcom.h 中搜索AtlIPersistPropertyBag_Load 。在此函数的实现中搜索HRESULT hr = pPropBag->Read(pMap[i].szDesc, &var, pErrorLog); 。确保此行之前有以下代码： var.pdispVal = NULL; 。