AnimationControl

Controle de Animação

Um controle ActiveX para Visual Basic 6 que pode ser usado para exibir animações AVI ou GIF.

Desenvolvi esse controle ActiveX em 2006 e o ​​atualizei regularmente até 2016. Atualmente tenho pouco interesse em manter este projeto por mais tempo, mas acho que o código pode ser útil para outras pessoas.

Antes de fazer alterações

Se você fizer alterações no código e implantar o binário, lembre-se de que os controles ActiveX são componentes COM e, portanto, devem permanecer compatíveis com o binário, desde que você não altere os objetos COM, ou seja, o nome da classe pública e os GUIDs do controle ActiveX. Caso contrário, as pessoas que usam esses componentes provavelmente acabarão no famoso inferno do COM.

Dependências

Você precisará do SDK do Microsoft Windows 10, ATL e WTL 10.

Alteração necessária para ATL

Algumas versões do ATL possuem um bug em AtlIPersistPropertyBag_Load que causa travamentos. No arquivo atlcom.h procure AtlIPersistPropertyBag_Load . Dentro da implementação desta função procure HRESULT hr = pPropBag->Read(pMap[i].szDesc, &var, pErrorLog); . Certifique-se de que existe este código antes desta linha: var.pdispVal = NULL; .