Win 7 Enable/Disable Minimize Animation On The Fly(Windows)
Posted: Fri Nov 12, 2010 11:35 am
Hi
Code: Select all
;Get minanimation flag
anm.ANIMATIONINFO\cbSize = SizeOf(ANIMATIONINFO)
SystemParametersInfo_($0048, SizeOf(ANIMATIONINFO), @anm, 0)
Debug anm.ANIMATIONINFO\iMinAnimate
;******************************************************************
;Enable minanimation flag
anm.ANIMATIONINFO\cbSize = SizeOf(ANIMATIONINFO)
anm.ANIMATIONINFO\iMinAnimate = 1
SystemParametersInfo_($0049, SizeOf(ANIMATIONINFO), @anm, 0)
;Debug anm.ANIMATIONINFO\iMinAnimate
;******************************************************************
;Disable minanimation flag
anm.ANIMATIONINFO\cbSize = SizeOf(ANIMATIONINFO)
anm.ANIMATIONINFO\iMinAnimate = 0
SystemParametersInfo_($0049, SizeOf(ANIMATIONINFO), @anm, 0)
;Debug anm.ANIMATIONINFO\iMinAnimate