17

I have a Delphi 2007 application that has a TAnimate control with a FindFile Common AVI. It works perfectly when the application is run on Windows XP, but nothing ever appears on Windows 7. I've heard it now requires its own thread, but I am not certain.

Does anyone know how to get TAnimate's Common AVI control to work on Windows 7 (or Vista)?

John Topley
  • 113,588
  • 46
  • 195
  • 237
Mick
  • 13,248
  • 9
  • 69
  • 119

1 Answers1

21

You must add the unit ShellAnimations to you project or add the component TShellResources from the Win32 tab of the component palette. (Tested in Windows Vista- Delphi 2007)

uses
ShellAnimations;

this unit adds the following replacement animation resources to your executable:

  • FindFolder.res
  • FindFile.res
  • FindComputer.res
  • CopyFiles.res
  • CopyFile.res
  • RecycleFile.res
  • EmptyRecycle.res
  • DeleteFile.res

Bye.

RRUZ
  • 134,889
  • 20
  • 356
  • 483