transparentes Form mit PNG .. ich komm nicht weiter

[Schneehasi]

Hallo, ich benutze den hier angegebenen Code

hier

um eine Art splash screen zu machen mit einem transparenten PNG ... das schaut auch so schon sehr gut aus , ich möchte aber auf das Bild noch andere Komponenten zeichnen ( zB Labels und andere Bilder)

leider ist alles was ich sehe das eine PNG ... alles andere wird nicht angezeigt :-/

weiß jemand Rat ?

Gruß, Thomas

[xaromz]

Hallo,

laut Microsoft und auch einigen Testern hier im Forum geht das nicht. Ich zeichne immer alles, was ich anzeigen will, direkt auf das Bild.

Gruß
xaromz

[Schneehasi]

das find ich nicht toll das das nicht geht ...

im Prinzip möchte ich folgendes machen

ein halbransparentes Form (oder was auch immer) auf einen anderen Untergrund (bewegt) legen und auf diesen halbtransparenten Bereich zeichnen Labels legen, etc

Zitat:

Ich zeichne immer alles, was ich anzeigen will, direkt auf das Bild.

wie meinst du das ? du malst es mit in das PNG ? oder versteh ich das jetzt falsch ?

Gruß

[turboPASCAL]

Ja, das geht mit einem Trick:

http://www.delphipraxis.net/internal...=606056#606056

[xaromz]

Hallo,

Zitat:

Zitat von Schneehasi

wie meinst du das ? du malst es mit in das PNG ?

Genau. Immer, wenn sich etwas ändert, nehme ich mein PNG, male drauf und übergebe das Ergebnis an UpdateLayeredWindow.

Gruß
xaromz

[Schneehasi]

Zitat:

Zitat von turboPASCAL

Ja, das geht mit einem Trick:

http://www.delphipraxis.net/internal...=606056#606056

den Thread kannte ich noch nicht ... werd das wohl mal probieren ... ansonsten muss ich das Vorhaben wohl verwerfen und eien andere Lösung schaffen :-/

bei Erfolg lass ich es euch wissen ;-)

Gruß

[Schneehasi]

ich möchte nur kurz noch zeigen um was es mir geht ... das geht am einfachsten an einem Screener :-)

der leicht hellere Bereich in diesem Bild ist ein halbtransparentes PNG auf einem Form welches auf dem Untergrund schwebt.

auf diesem möcht ich nun noch andere Sachen zeichnen (in diesem Fall die Lautstärke) ... vielleicht hat ja noch jemand eien ganz anderen Ansatz dies zu lösen ?

Grüße

[Khabarakh]

Gerade weil du nach einem "ganz anderen Ansatz" fragst, kann ich dir die Schönheit von WPF einfach nicht vorenthalten :duck: .

PS: Das obere ist ein ganz normal verwendbares Edit. Für eigene Styles war ich jetzt mal zu faul :mrgreen: .

[Schneehasi]

Zitat:

Zitat von Khabarakh

Gerade weil du nach einem "ganz anderen Ansatz" fragst, kann ich dir die Schönheit von WPF einfach nicht vorenthalten :duck: .

PS: Das obere ist ein ganz normal verwendbares Edit. Für eigene Styles war ich jetzt mal zu faul :mrgreen: .

das schaut genial aus und ist im Prizip genau das was ich möchte ... verrätst du mir wie du es machst ? oder ist das mit der Lösung mit den mehreren Forms über eineander ?

:-)

kann mich gar nicht sattsehen an dem Ding *g*

edit

ich glaub ich weiß nun was du mit WPF meinst ... :-/ .. das ist das neue M$ Framework. Mhh gibt es einen Weg dieses auch mit D7 einzusetzen ?

:-)

[Khabarakh]

Zitat:

Zitat von Schneehasi

ich glaub ich weiß nun was du mit WPF meinst ... :-/ .. das ist das neue M$ Framework.

So isses. Und dieses lässt sich eben nur mit .Net-Sprachen nutzen. Aber es bestätigt gleichzeitig auch, dass es wohl nur eine einzige Nicht-Frickel-Lösung: Auf die Win-API verzichten und alle Controls vollkommen eigenständig zeichnen. Und ja, WPF sieht einfach geil aus *g* .

[Schneehasi]

nun gut dann gibts keine transparente Lautstärkeregelung ... weil das was an der Frickellösung auch nicht geht ist das (halb-)transparente Fenster auf ein Video zu legen :-( .. geht schon nur dann isses halt nimmer transparent, und das war genau das was ich brauchte

[Schneehasi]

ich wollt mich noch nicht geschlagen geben und wollte noch eine Sache probieren ...
Form auf Form legen und den Bildteil der durch das obenliegende Form verdeckt wird kopieren und auf das Form oben einfügen ... ( dabei das Eingefügte abdunkeln ) .. und schon hab ich genau den Effekt den ich brauche

Delphi-Quellcode:

procedure TfVolumeBar.WMPaint(var Message: TWMPaint);
var
  DC: HDC;
begin
  DC := GetDC(MainForm.Handle);
  BitBlt(imgBackground.Canvas.Handle, 0, 0, left, top, DC, left, top, SRCCOPY);
  ReleaseDC(Application.Handle, DC);
  imgBackground.Repaint;
  inherited;
end;

gut gut .. das geht auch so, Problem ist aber, wenn sich im unten liegenden Form etwas an der verdeckten Stelle ändert, bekommt das oben liegende dies nicht mit ( auch wenn ein Timer alle paar mS ein Paint sendet )

... kann es sein , dass Windows den verdekten Teil gar nicht neu malt ? und somit geht das kopieren auf einen "alten" Bildausschnitt los ?

Wie kann ich das lösen ?

[Schneehasi]

ich konnte das Problem noch nicht lösen ...

*push* :-(