Kein Event bei PtInRect

[EWeiss]

Hab das nochmal geprüft..
Denke das Problem kommt wo anders her

Teil meiner Proc

Delphi-Quellcode:

      WM_PAINT, WM_PRINT:
      begin
        Img := GetButImageProperty(WinHandle);
        ButtonStyle := GetButStyle(WinHandle);
        if (ButtonStyle and BS_USERBUTTON) = BS_USERBUTTON then
          IsStaticLabel := True;

        if (Img <> 0) or IsStaticLabel then
        begin
          GetClientRect(WinHandle, rc);
          if Msg = WM_PAINT then
          begin
            hDC := BeginPaint(WinHandle, ps);

und das ende

Delphi-Quellcode:

        if Msg = WM_PAINT then
        begin
          if not Composited then
            DoubleBuffer(0, 0, 0, 0);

          EndPaint(WinHandle, ps);
        end;
        Result := 0;
        exit;
      end; // end WM_PAINT, WM_PRINT

      WM_DESTROY:
      begin
        // GDIPLUS button image löschen
        Img := GetButImageProperty(WinHandle);
        DeleteResource(Img);
      end;
    end;
    Result := CallWindowProc(ButOldProc[nil, 0], WinHandle, Msg, wParam, lParam);
  end; // End With

Wenn ich nun EndPaint(WinHandle, ps); deaktiviere funktioniert
alles so wie es soll MouseMove usw ..
Nur was dann passiert könnt ihr euch denken das geht 2 Minuten gut dann wars das.

Wie könnte ich das problem lösen hab im moment keine idee.

gruss Emil