Animate Window wirkungslos??

[shmia]

Such doch einfach mal in der MSDN: AnimateWindow
Es gibt einige Dinge, die verhindern, das AnimateWindow arbeiten kann.
Vorallem solltest du den Returncode auslesen und mit GetLastError nachfragen ,was schiefgegangen ist.
z.B. so:

Delphi-Quellcode:

if not AnimateWindow(Form2.Handle, 3000, AW_BLEND) then
   RaiseLastWin32Error; // GetLastError abfragen und Exception werfen