formstyle:=fsStayOnTop, wenn Fenster inaktive dann ausblende

[juergen]

Hallo zusammen,
ich habe eine ganze Weile gesucht aber irgendwie das Passende noch nicht direkt gefunden, bzw. die vielen Threads dazu im Detail nicht verstanden, was für mich nun die passende Lösung wäre...

Meine Hauptform hat die Eigenschaft -> fsStayOnTop
Nun würde ich gern die Anwendung transparent machen (über AlphaBlend := True und AlphaBlendValue :=xxx), wenn die Anwendung INAKTIV ist. Sowie das Fenster der Anwendung wieder aktiviert wird soll es wieder voll sichtbar sein.
Gibt es hier eine "leichte" Möglichkeit der Umsetzung?

Vielen Dank vorab!

Grüße Jürgen

[Zacherl]

Ich kenne mich jetzt mit .Net nicht aus, aber unter Win32 könnte man einfach die Ereignisse OnActivate und OnDeactivate benutzen.

Korrigiert mich, wenn dies unter .Net nicht gehen sollte.

Florian

[juergen]

Nachtrag!
Sorry, Sprache nicht NET sondern Delphi Win 32

[juergen]

Hallo Florian,
genau das habe ich versucht. Geht aber "irgendwie" nicht...
Hier mein Code dazu:

Delphi-Quellcode:

procedure TMyForm.HauptformOnDeactivate(Sender: TObject) ;
begin
     if MyForm.active = False then begin
     MyForm.AlphaBlend :=  True;
     end;
end;

procedure TMyForm.HauptformOnActivate(Sender: TObject) ;
begin
     if MyForm.active = True then begin
     MyForm.AlphaBlend :=  False;
     end;
end;

Oder muss ich vielleicht die Anwendung selbst abfragen? Wenn ja, wie?

Gruß Jürgen