Graphischer Hint mit eigenen Bitmap

[Schwedenbitter]

Ich bin jetzt schon soweit, dass ich die Ausgabe der Grafik hinbekomme, wobei FRect und Picture Eigenschaften der Komponente sind:

Delphi-Quellcode:

Var
   DesktopDC      : HDC;            // Handle auf irgendeinen Desktop
   DesktopCanvas   : TControlCanvas;// Leinwand zum Malen
   ...
Begin
   ...
         DesktopDC:=GetDC(0);
         If DesktopDC<>0 Then
         Try
            DesktopCanvas:=TControlCanvas.Create;
            Try
               DesktopCanvas.Handle:=DesktopDC;
               DesktopCanvas.Draw(FRect.Left,FRect.Top,Picture.Bitmap);
            Finally
               DesktopCanvas.Free;                  End;
         Finally
            ReleaseDC(0, DesktopDC);
         End;

Ich weiß zwar, wie ich den Bereich unter dem Bitmap wieder in den ursprünglichen Zustand zurückversetzen kann. Leider gibt es bei TApplication kein Ereignis wie z.B. OnHideHint. Die Procedure HideHint bringt mich nicht weiter. Ich möchte auch nicht TApplication ändern und um ein Ereignis erweitern...

Gibt es eine Möglichkeit herauszubekommen, wann der Hint wieder ausgeblendet werden muss?
Ich bin so kurz vor dem Ziel

Bei Bedarf gebe ich den Quelltext wieder mit. Ich habe aber Angst verhauden zu werden, wenn ich zig Versionen meines Programm hier einstelle...