Imagen encima de todo

[yusnerqui]

Me he visto tentado a poner este trozo de código aquí, con él puedo pintar una imágen en cualquir parte de la pantalla encima de cualquier cosa.

Código Delphi [-]
 Var
   A : TCanvas;
begin
  A:= TCanvas.Create;
  A.Handle := GetDC(0);
  A.Draw(Image1.ClientOrigin.X,Image1.ClientOrigin.Y,Image1.Picture.Bitmap);
  A.Free;
end;

No creo que sea la solución pero quizas te de una idea para que sigas investigando, el mayor problema que le veo es que me trabaja bien desde el clic de un boton por ejemplo, pero no he logrado hacer que lo haga automáticamente en un evento del Form.

Claro esta sugerencia es válida si no vas a optar por lo comentado anteriormente, que posiblemente si sea una solución completa, dependiendo de lo complicada que pueda ser la imágen para formar su region correspondiente.
Saludos Yusnerqui