Kein Event vom Timer Win7

[EWeiss]

Ich erstelle einen Timer über MMSystem

Delphi-Quellcode:

procedure TimerProc(wTimerID: DWORD; Msg: DWORD;
                                     dwUser: longint;
                                     dw1: longint;
                                     dw2: longint); stdcall;
begin
  PostMessage(RenderHandle, MyTimerMessage, dw1, dw2);

end;

Delphi-Quellcode:

RenderHandle  := Classes.AllocateHWnd(RenderProc);
TimerID := timeSetEvent(25, 300, @TimerProc, RenderHandle, TIME_PERIODIC);

Delphi-Quellcode:

procedure RenderProc(var Msg: TMessage);
begin
  blabla..;

end;

In Xp feuert der Timer richtig ab..

Unter Win7 geht so gut wie gar nichts.
System ist schnell genug daran liegt es nicht.

Sieht so aus das mein Event in der RenderProc nicht richtig ankommt.
Die Fenster scheinen das irgendwie zu blocken.

Jemand ne ahnung was das sein könnte?

EDIT:
Es liegt an der Oberfläsche von Win7.
Sobald ich die Visuellen Style ausschalte funktioniert das Event wieder. Was soll denn der Mist jetzt.

Gibt es eine alternative die Funktioniert?

gruss Emil