Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Form Hintergrund - Deckkraft veringern? (https://www.delphipraxis.net/40892-form-hintergrund-deckkraft-veringern.html)

aerotech 22. Feb 2005 19:40


Form Hintergrund - Deckkraft veringern?
 
Hallo, ist es Möglich bei klicken eines Butttons in meinem Hauptfenster ein zweites zu erstellen, welches nur eine geringe Deckkraft des Hintergrundes aufweisst? Sprich, so ne art Präsentationsfolie die man auf eine Seite legt? Aber der Text auf der Transparenten Form sollte nicht schwächer werden!

alcaeus 22. Feb 2005 19:41

Re: Form Hintergrund - Deckkraft veringern?
 
Sieh dir mal Delphi-Referenz durchsuchenAlphaBlend von TForm an.

Greetz
alcaeus

aerotech 22. Feb 2005 19:57

Re: Form Hintergrund - Deckkraft veringern?
 
ok danke, hab die form verblasst bekommen....aber die labels darauf verblassen mit! :(

Vjay 23. Feb 2005 09:27

Re: Form Hintergrund - Deckkraft veringern?
 
Das ist wirklich schwierig, dazu brauchst du zwei Forms.

Als erstes erzeugst du eine Region, die die Rechtecke aller Controls, der Caption und dem Rand enthält.
Mit SetWindowRgn schneidest du den Hintergrund des Forms weg. Nun erstellst du ein zweites Form, machst dieses halb-transparent und legst es dahinter. Jetzt musst du bei allen WM_WINDOWPOSCHANGING das Hintergrundform an das Vordergrundform anpassen. Ausserdem musst du bei Klicks auf das Hintergrundform automatisch das Vordergrundform mit nach vorne holen.

Es ist also nicht mit Setzen einer Property getan, sondern um einiges schwieriger. Da du dir dafür eine Menge neues Wissen aneignen müsstest, denke ich wäre es für dich einfacher nach einer anderen Lösung zu suchen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz