Mainform verschleiern

[Alfonso]

So, jetzt bin ich selber fündig geworden und will die Antwort nicht vorenthalten, falls jemand die gleiche Lösung sucht.

Ich habe in meinem Programm die Funktion "Alphablendrect" aus DP aufgenommen.
Dann habe ich ein kleines unsichtbares Panel auf mein Mainform gesetzt, auf dem ein TImage mit align:=alclient platziert ist (damit ich eine Canvas habe).
Wenn ich den Schleier haben will, rufe ich folgendes auf:

Delphi-Quellcode:

 Panel1.Align:=alclient;
 Image2.Picture.Bitmap:=self.GetFormImage;
 AlphaBlendRect(Image2.Canvas,panel1.ClientRect,clblack,70);
 Panel1.Show;

Dadurch erreiche ich den Grauschleier. Will ich diesen entfernen, rufe ich nun nur folgendes auf:
Panel1.Hide; Gruß
Alfonso