NUR das Formular transparent machen

[jaschu]

Hallo!

Ich bin riesiger MacFan und versuche deshalb Miniprogramme im Mac-Design zu schreiben.

Heute: Die Lautstärkereglung vom Mac ^^

Da ist das Formular kaum noch zu sehen, während alles andere darauf voll sichtbar ist.

Habt ihr ne Idee wie ich das - möglichst einfach - hinbekommen kann?

www.a.toolsnfun.de/macvol.exe

Danke schonmal!

Jaschu

[alzaimar]

Schonmal TForm.Alphablend probiert?

[Daniel G]

Zitat:

Zitat von alzaimar

Schonmal TForm.Alphablend probiert?

Kommt auf die Delphi - Version an, die er hat. Bei Delphi 5 geht's zum Beispiel nicht.

@jaschu: Bemüh' mal die Foren Suche, du müsstest in der DP genug finden.

[Christian Seehase]

Moin Daniel,

da AlphaBlend über Windows-API Aufrufe funktioniert (u.A. SetLayeredWindowAttributes), kann man es aber nachrüsten, wenn es nicht schon enthalten ist.

Es wird aber nicht, wie gewünscht, nur das Formular transparent, auch die darauf befindlichen Controls.

[SirThornberry]

genau, und da hab ich auch schon vor einiger zeit was gepostet
http://www.delphipraxis.net/internal...=337906#337906

[Daniel G]

Zitat:

Zitat von SirThornberry

genau, und da hab ich auch schon vor einiger zeit was gepostet
http://www.delphipraxis.net/internal...=337906#337906

Zitat:

Zitat von jaschu

Da ist das Formular kaum noch zu sehen

Heißt "kaum noch" jetzt "gar nicht mehr?"

weil, ansonsten würde es ja nicht gehen, wie Christian gesagt hast:

Zitat:

Zitat von Christian Seehase

willst du das Form vollständig durchsichtig oder nur zum teil? Wenn du es nur teilweise durchsichtig haben willst dann geht das was du vor hast nicht.

[jaschu]

Ich will dem Form einen Alphawert von zum Beispiel 150 geben, wie das auch einfach mit

form1.AlphaBlendValue

funktioniert.

Nur will ich, dass einige Elemente AUF dem Formular (Labels, Images...) komplett sichtbar bleiben und net durchsichtig werden.

[jaschu]

Also hier nochmal ein Bild dazu, ich glaub daran wird es ganz gut deutlich was ich meine:

http://donzee.free.fr/aqua/20.jpg

[alzaimar]

Knifflig, aber möglich (hab ich mal so gemacht). Simuliere das Alphablend:
Am einfachsten ist es, wenn Du genau weisst, wie deine Form aussieht (z.B. eine Bitmap).
Dann machst Du folgendes:
Du brauchst eine Bitmap als Form-Hintergrund.

1. Form kurz unsichtbar machen.
2. Desktp-Bitmap holen
3. Den Original-Hintergrund deiner Form mit dem Teil des Bildschirmes, den deine Form überdeckt, vermischen. Das ist dein simulierter Alpha-Blend.
4. Form.BackgroundImage := Die unter 3 berechnete Bitmap.
5. Form wieder sichtbar machen

Tipp: Bei (3) machst Du dir noch die Mühe und verwischst den Übergang von Form.Background zum Desktop ein wenig. Das sieht dann erst richtig geil aus.

Das rufst Du bei jedem Form.OnPaint auf. Es dauert nur ca. 1/20 sek und ist kaum zu sehen. Eine andere Idee hätte ich jetzt nicht.

[jaschu]

Das is aber wohl leider alles andere als Resourcenschonend =/

Gibt da keine ander Möglichkeit?
Ne Komponente oder sowas? ^^

[MacNuke]

Hi.

Du musst aber beachten, das die Transparenz-Möglichkeiten von Windows denen von OS X doch sehr hinterherhinken... ;)

Es ist zwar möglich, aber es ist weder Ressourcen-Schonend, noch klappt das immer. Wenn du das z.B. über ein Video einblendest hast du, soweit ich weiß, schon ein Problem.

@alzaimar

Und was passiert nach deiner Methode, wenn das Fenster über einem anderen Fenster liegt, welches sich verändert? Bleibt doch "hängen", oder?

[alzaimar]

@Macnuke: 'Hängen' bleibt es nicht, aber solange Du nichts unternimmst, wenn sich der Hintergrund ändert, sieht das natürlich nicht gut aus. Ich hatte das eigentlich nur mal gemacht, um die Ränder eines Bitmap-Formulars nicht so ecking und fransig aussehen zu lassen: Die äußeren 3-5 Pixel wurden dann mit einem Übergang versehen: Das sah gut aus. Da waren höchstens mal ein paar Pixel nicht ganz richtig. Beim ersten Klick auf das Form zeichnet es sich ja neu und dann gehts. Bei Videos geht's natürlich gar nicht mehr :( Selbst ein Timer bringt da nicht viel.

Ach, und resourcenschonend ist das schon gar nicht. Eher das Gegenteil...

[jaschu]

Hm

Ich meine, ich hatte mal ein Formular komplett durchsichtig gemacht. So dass man NUR NOCH die Buttons sah.
(Glaube ich, geht das, kann mir das wer bestätigen?)

Da könnte man doch jetzt ein transparentes Hintergrundbild nehmen, oder?

[alzaimar]

Ich habe die Idee (aber nicht lachen):
Du hast in Wirklichkeit 2 Formulare.
Form1 zeigt den Hintergrund und ist durchsichtig.
Form2 hat genau die Form der Steuerelemente und 'schwebt' über Form1. Form2 ist NICHT durchsichtig.

Du musst jetzt noch eine Routine schreiben, die anhand aus Form und Lage der Steuerelemente eine Bitmapmaske erstellt. Daraus kann man mit einfachen Mitteln eine 'Region' basteln. Die weisst Du der Form2 zu und pronto. Das klappt in jedem Fall.

Der Effekt ist der Gleiche wie bei Apple.

[jaschu]

Hmm, ich weiß jetzt net genau was du meinst mit der Routine...

Würde doch an und für sich wirklich reichen, die Steuerelemente mit Shapes quasi aus der 2. Form "Auszuschneiden", oder nicht?

[Thebe]

Layered Windows, AlphaBlend und UpdateLayeredWindow sind deine Freunde. Da kannste 32bit Bitmaps (sprich mit Alphakanal) benutzen für deine Form.

Nachteil:

Du musst Dich um ALLES (Buttons, Neuzeichnen der Form etc.) selber kümmern.

[tinibeenie]

Hi jaschu!

Hab gerade eine JVCL-Komponente entdeckt, die das ganze bzw. Teile des Forms unsichtbar macht. Es ist JvTransparentForm. Du könntest dann ein halb-transparentes Bild erstellen und darauf packen. Das geht ganz einfach, hab ich auch grad so gemacht. Man kann sonst auch Masken für die Komponente benutzen. Am Schluss, wenn alles ausgeblendet werden soll, kannst du ganz normal AlphaBlend benutzen, denn damit verschwindet ja alles.

PS: Ich weiß, es ist ein bisschen spät, aber wielleicht kannst du es doch noch gebrauchen...