Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi Transparenz Farbe (https://www.delphipraxis.net/13307-transparenz-farbe.html)

cylon 16. Dez 2003 13:26

Re: Transparenz Farbe
 
Liste der Anhänge anzeigen (Anzahl: 1)
Ich hab hier jetzt mal die exe hochgeladen, um das zu zeigen...
So sieht das bei mir aus..
Aber um die einzelnen Buttons soll das schwarz weg. Das geht aber nicht.
entweder das bleibt so oder der GANZE Button ist transparent. :gruebel:

Also ich hab überhaupt keine Ahnung...

Gandalfus 16. Dez 2003 14:02

Re: Transparenz Farbe
 
Zitat:

Zitat von cylon
hmm..also ich hab das mal asprobiert und folgendes eingegeben:
(wobei ich nicht genau weiß ob 000000 der code für schwarz ist)

clblack ist schwarz.

cylon 16. Dez 2003 15:41

Re: Transparenz Farbe
 
Sanchez schrieb:
Zitat:

Ne ist nicht das gleiche ein TImage beinhaltet ein TPicture welches wieder ein TBitmap beinhaltet.
Ich hab aber nen JPEG Bild. Geht das damit nicht?? Ich werd es mal zu nem Bitmap machen. Mal sehen obs geht.

cylon 16. Dez 2003 17:54

Re: Transparenz Farbe
 
Also hier in Delphi kann ich garnix mehr machen, was Transparenz angeht...
Ob ich das hier schreibe:
Code:
procedure TFormStart.FormCreate(Sender: TObject);
begin
 ImageNS.Picture.Bitmap.TransparentColor := $00000000 ;
end;
oder das hier:
Code:
procedure TFormStart.FormCreate(Sender: TObject);
begin
 ImageNS.Picture.Bitmap.TransparentColor := clblack ;
end;
oder nen bitmap anstatt nem JPEG bild verwende

oder einfach nur im OI bei dem Bild was ich transparent haben will die Eigenschaft 'Transparent' auf 'True' setzte...

NIX ÄNDERT SICH...... :wall:

Gandalfus 16. Dez 2003 18:42

Re: Transparenz Farbe
 
probiere mal volgendes:

Delphi-Quellcode:
var
  test: TBitmap;
oncreate:
Delphi-Quellcode:
test := TBitmap.create;
 test.loadfromfile('c:\XXXXX\XXXX.bmp');{<-- das bild mal mit paint erstellen}
 test.PixelFormat := pf24bit;
 test.transparentcolor := clblack;
 test.transparent := true;
onpaint(des Formulars):
Delphi-Quellcode:
Canvas.draw(10,10,test);
onclose:
Delphi-Quellcode:
test.free;


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:25 Uhr.
Seite 2 von 2     12   

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