Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi PageControl mit transparentem Hintergrund gesucht (https://www.delphipraxis.net/147949-pagecontrol-mit-transparentem-hintergrund-gesucht.html)

ryLIX 19. Feb 2010 15:08


PageControl mit transparentem Hintergrund gesucht
 
Gibt es ein TabSet welches einen transparenten Hintergrund hat?
Hab schon gesucht aber nichts gefunden.

[edit=alzaimar]Titel auf Bitten des Autors geändert. Mfg, alzaimar[/edit]

ryLIX 20. Feb 2010 12:14

Re: TabSet mit Transparenz?
 
*Bump*
:duck:

Hat niemand eine Idee wie ich den Hintergrund eines Tabsets oder die Tabs eines PageControl bzw TabControl Transparent bekomme?

DelTurbo 20. Feb 2010 13:14

Re: TabSet mit Transparenz?
 
Bei den Raize Components ist sowas bei.

ryLIX 20. Feb 2010 13:29

Re: TabSet mit Transparenz?
 
Ich gesehen das der TMS Office TabPager auch Transparenz bietet.
Problem ist nur das an der stelle wo der Hintergund transparent sein soll schon ein selbst gezeichneter Hintergrund eines anderen Controls ist welche dann ignoriert wird.

DelTurbo 20. Feb 2010 13:34

Re: TabSet mit Transparenz?
 
Das ist leider das prob. Jeder handelt das anders. Ich habe lange suchen müssen bis ich eine CheckBox hatte die "wirklich" Transparent ist. Und das dann auch unter Windows 2000.

Du musste die sachen wohl oder übel mal durchprobieren....

Schau auch mal bei www.lmd.de

ryLIX 20. Feb 2010 14:42

Re: TabSet mit Transparenz?
 
LMD hab ich geschaut aber anscheinend funktioniert des Semi Transparenz welches im Wiki beschrieben ist nicht mit dem PageControl bzw TabControl :?

DelTurbo 20. Feb 2010 14:49

Re: TabSet mit Transparenz?
 
Nochmal, du willst das oben neben Tabs entweder der hintergrund ist, oder halt ein objekt oder. Das wird ja vom PageControl verdeckt.

Wenn du das willst, Raize macht das. Ich habs grad probiert. Einfach im Pagecontrol einen hacken bei transparent setzten. Fertig.

ryLIX 20. Feb 2010 16:00

Re: TabSet mit Transparenz?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ich hoffe man erkennt auf dem Bild was genau ich vorhabe.

So ein Panel zu zeichnen war nicht das große Problem aber an den Tabs häng ich nun schon einige Zeit...

Raize werd ich gleich mal versuchen.

DelTurbo 20. Feb 2010 16:07

Re: TabSet mit Transparenz?
 
Ist zwar ein bissl schwer auf dem 3x3 pixel bild :P , aber ich glaube zu erkennen was du meinst. Das ist auch das was ich meine.

ryLIX 20. Feb 2010 16:16

Re: TabSet mit Transparenz?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Also ich hab ein JvPanel aus den Jedis auf meinem Form und zeichne darauf ein Image als Oberfläche.
Dann hab ich mir nun ein PageControl aus den Raize Kompos drauf gezogen so das die Tabbar des PageConrtrols auf dem Panel liegt.

Wenn ich nun Das Pagecontrol auf Transparen stelle wird mir aber mein Image immer noch nicht gezeigt :wiejetzt:
War bei LMd auch so.

Ich hab mal die Farbe des Forms verändert damit man es besser sehen kann ob die Transparenz funktioniert.

DelTurbo 20. Feb 2010 16:34

Re: TabSet mit Transparenz?
 
Liste der Anhänge anzeigen (Anzahl: 1)
Du musst dein programm auch starten. In der IDE wird das nicht richtig angezeigt. Wenn du es startest sieht es wie im anhang aus.

ryLIX 20. Feb 2010 16:39

Re: TabSet mit Transparenz?
 
Zitat:

Zitat von DelTurbo
Du musst dein programm auch starten. In der IDE wird das nicht richtig angezeigt. Wenn du es startest sieht es wie im anhang aus.

:freak:

Das ist das gestartete Form...
Kann es sein das es daran liegt das ich hier in Delphi2009 hab :gruebel:

DelTurbo 20. Feb 2010 16:46

Re: TabSet mit Transparenz?
 
Uff, das weiss ich leider nicht. Ich hab nur das 7er. Aber da macht es halt das was du willst. Deswegen hab ich das grad nicht verstanden. Ich dachte schon wir reden aneinander vorbei :D

Also ich kann es mir eigentlich nicht vorstellen das es an der version liegt. Aber da sollte jemand antworten der 2009 hat.

DelTurbo 20. Feb 2010 17:07

Re: TabSet mit Transparenz?
 
Nochwas, hast du kein Windows XP wo du das mal testen kannst. Wie ich schon schrieb hatte ich mal CheckBoxen die waren überall transparent, nur auf Windows 2000 nicht. Vielleicht liegt es ja daran. Mehr fällt mir leider nicht ein.

ryLIX 20. Feb 2010 17:25

Re: TabSet mit Transparenz?
 
Zitat:

Zitat von DelTurbo
Nochwas, hast du kein Windows XP wo du das mal testen kannst. Wie ich schon schrieb hatte ich mal CheckBoxen die waren überall transparent, nur auf Windows 2000 nicht. Vielleicht liegt es ja daran. Mehr fällt mir leider nicht ein.

Ja hab ich aber eigentlich sollte es bei Vista klappen O.o

Tante Edit meint das es bei Windows Xp auch net klappt ....

ryLIX 21. Feb 2010 14:17

Re: TabSet mit Transparenz?
 
Ich versuch nun mal das Problem anders anzugehen.

Liegt es vielleicht daran wie ich den Hintergrund zeichne?
Delphi-Quellcode:
procedure TForm1.JvPanel1Paint(Sender: TObject);
var
  img: TJPEGImage;
  Count, I, X, Y : Integer;
  SrcRct: TRect;
  Brush: TBrush;
begin
  img := TJPEGImage.Create;
  img.LoadFromFile('back.jpg');
  Count := round(JvPanel1.Width / img.Width);
  for I := 0 to Count do
  begin
    X := JvPanel1.Left + round(img.Width * I);
    Y := JvPanel1.Top;
    JvPanel1.Canvas.Draw(X, Y, img);
  end;
end;
Ich hab auch schon versucht das ganze direkt auf des Canvas vom Formular zu zeichnen aber das macht keinen Unterschied...

Zu dem hab ich alles Mögliche an 3rdParty Komponenten probiert die Transparenz unterstützen.
Es ist eigentlich immer so das mein Panel was hinter dem PageControl liegt ignoriert wird...

Ich versteh nur nicht warum...

DelTurbo 22. Feb 2010 10:28

Re: PageControl mit transparentem Hintergrund gesucht
 
Liste der Anhänge anzeigen (Anzahl: 1)
Weil nach meinen infos es nur eins richtig macht. Ich habe dir nochmal einen shot gemacht mit 4 Pagecontrols drauf. Das Sheet1 ist immer OHNE transparenz. Das Sheet2 immer mit. Wie du siehst gelinkt es nur dem unteren das richtig zu machen.

ryLIX 22. Feb 2010 11:11

Re: PageControl mit transparentem Hintergrund gesucht
 
Liste der Anhänge anzeigen (Anzahl: 1)
Das doch nicht normal oder? -.-

Ich hab jetzt mal eine Demo angehängt mit einem Raize PageControl drauf.
Code für die Tranzparenz umschaltung:
Delphi-Quellcode:
  if rzPageControl1.Transparent then
    rzPageControl1.Transparent := false
  else
    rzPageControl1.Transparent := true;
Den Code für das Image auf dem Panel hab ich weiter oben gepostet.

DelTurbo 22. Feb 2010 11:29

Re: PageControl mit transparentem Hintergrund gesucht
 
*hust*

Irgenwie sieht es wirklich anders aus. Das Panel was du nutzt, ist das aus dem packet JVCL339CompleteJCL211-Build3536.zip? Weil das habe ich nicht drauf. Dann müsste ich das nachher mal installen und dann jag ich das mal durch. Weil langsam wird man ja wuschig. Hast du auch wirklich dieses packet geladen? http://www.raize.com/DevTools/RzComps/RC5Trial.zip bzw. die vollversion.

Weil es bringt ja nicht viel wenn wir mit unterschiedlichen sachen arbeiten. :zwinker:

DelTurbo 22. Feb 2010 11:42

Re: PageControl mit transparentem Hintergrund gesucht
 
Nachtrag: Ich habe übrigens ein Image genommen. Kein Panel. Versuch das doch mal.

ryLIX 22. Feb 2010 14:55

Re: PageControl mit transparentem Hintergrund gesucht
 
Raize is V5.3.0.0 Vollversion.

Grbl mitm Image gehts -.-
Zwei Fragen beleiben dann noch.
Wie kann ich mein Bild nun abhängig von der Control breite X mal nebeneinander zeichnen?
Kann ein Image auch andere Controls beherbergen?

Und es bleibt immer noch die Frage warum es mit einem Panel nicht geht.
Denn da seh ich bei der Tranzparenz noch nicht mal das Panel im Hintergrund.

Tante Edit meint das ich das zeichnen des image im Form.Show und Form.Resize machen kann ohne Probleme.

DelTurbo 22. Feb 2010 15:05

Re: PageControl mit transparentem Hintergrund gesucht
 
Geht es dir nur ums kacheln? Das geht doch bestimmt auch anders. Öhm, mal bissl blöd gedacht, z.b. mit den html.

Ansonsten muss ich leider auf folgenden link verweisen. SORRY....

http://www.google.de/search?hl=de&so...meta=&aq=0&oq=


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