Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   form transparent (https://www.delphipraxis.net/165595-form-transparent.html)

Mystery 7. Jan 2012 19:05

form transparent
 
Ich bin auf folgendes Problem getoßen und finde meinen Fehler leider nicht.

MeinProgramm soll fo,gendermaßen aussehen:
Ein durchsichtiges Formular, so dass nach Start des Programms der Hintergrund ganz normal zu sehen ist. Ein label ist in der Mitte des Formulars. Die Hintergrundfarbe des Labels soll ebenfalls transparent sein.

Mein Lösungsversuch:

bei tform1 create: Form1.Brush.Style:=bsClear;
Form1.BorderStyle:=bsNone;

Jetzt ist das Programm durchsichtig und ich kann die sichtbaren Symbole und Buttons etc die man durch das durchsichtige Formular sieht nicht anklicken. So soll es ja auch sein :)

Jedoch: Obwohl ich das Label auch auf transparent gesetzt habe, ist die Hintergrundfarbe des Labels schwarz und nicht durchsichtig ..

Setze ich das ganze Formular auf transparent, so ist es wie es sein soll, man sieht die caption des Labels und es hat einen transparenten Hintergrund. Leider kann man jetzt die Programme öffnen die sich hinter dem Programm befinden.

Fällt euch ein Lösungsvorschlag ein?! Wäre nett :-)

s.h.a.r.k 7. Jan 2012 20:17

AW: form transparent
 
Schau dir mal GDI+ an. Mit den normalen Mitteln, d.h. WinForms, geht es leider nicht so recht... Da gibt es viel zu viele Probleme. Evtl. kannst du dir auch Direct2D anschauen, wenn du Delphi XE oder höher zur Verfügung hast.

chaosben 8. Jan 2012 14:59

AW: form transparent
 
Fürs Erste könntest du es auch so machen, wenn du auf eine Farbe verzichten kannst:

Delphi-Quellcode:
procedure TForm19.FormCreate(Sender: TObject);
begin
  Self.TransparentColor := Self.Color;
  Self.Transparent := true;
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:39 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