Gelöst: Transparenz JPG

[COMMANDER86]

Hallo zusammen,

seid mir net bös, wenn das hier schon irgendwo steht... ich habe via Suche leider Nichts finden können. Vl. suche ich falsch... However:

Ich verwende diverse Grafiken in meinen Formularen, um diese ein bisschen bunter zu gestalten... Stichwort: Userfreundlichkeit. Das TImage kann ja sowohl BMP als auch JPG einladen und ich lade diverse Bildchen zur Laufzeit, um die Anwendung klein zu halten (FormCreate).

In beiden Fällen habe ich die Eigenschaft "Transparent" auf True gestellt, aber es greift nur bei BMP-Files. Dort wird die Transparenz angewandt. Bei JPG allerdings nicht. Da sehe ich den fetten weißen Hintergrund der Grafik. Habe ich eine Einstellung übersehen, oder ist das prinzipiell bei JPG nicht möglich?

Liebe Grüße
Fabian

[DiBo33]

oder ist das prinzipiell bei JPG nicht möglich?

Genau das.

[COMMANDER86]

Genau das.

Okay, danke!

PS: Kann man hier ein Thema schließen oder als "Done" markieren? Finde das hier gerade nicht...

LG
Fabian

[DiBo33]

PS: Kann man hier ein Thema schließen oder als "Done" markieren? Finde das hier gerade nicht...

Nein, einfach so lassen.

[mschnell]

Kann man hier ein Thema schließen oder als "Done" markieren? Finde das hier gerade nicht...

AFAIK: Du Kannst den "Betreff" Deines ersten Beitrags ändern und "Gelöst: " vorstellen oder etwas ähnliches.
-Michael

[Hitman]

Manche Komponenten (wie die TImageList) erlauben allerdings, dass man eine beliebige Farbe als "Transparenz" definiert. Dann wird einfach alles außer dieser Farbe gezeichnet. Damit dürfte aber z.B. ein etwas ausgefeilteres Blending nicht gehen (schließlich kann man die Transparenz dann nur per ja/nein definieren).

[COMMANDER86]

Manche Komponenten (wie die TImageList) erlauben allerdings, dass man eine beliebige Farbe als "Transparenz" definiert. Dann wird einfach alles außer dieser Farbe gezeichnet. Damit dürfte aber z.B. ein etwas ausgefeilteres Blending nicht gehen (schließlich kann man die Transparenz dann nur per ja/nein definieren).

So ähnlich funktioniert das doch auch bei einem Bitmap im TImage, oder? Ich bearbeite die grundsätzlich so, dass der Hintergrund giftgrün ist. Die Farbe wird dann nicht angezeigt und der Effekt ist Transparenz. Afaik sind Bitmaps aber auch nicht die feinste Grafiklösung. Da das vorher Cliparts waren, die das TImage nicht öffnen kann, musste ich ohnehin konvertieren, welches Format spielt dabei keine Rolle. Bitmaps wollte ich nicht wegen der Dateigröße; ist aber nebensächlich. Trotzdem Danke für den Hinweis. Denke, ich werde mir das bei Zeiten mal anschauen.

LG
Fabian

[Lollo67]

Hi Fabian!

Ich benutze komprimierte PNG Bilder... Mit z.B. Gimp die JPG/BMP Bilder umwandeln, dann hast du auch die Transparenz und geringe Speichergrösse!

Was anderes an die anderen... Wie kann man eine Grafik (Bild) aus dem laufenden Program am einfachsten ausdrucken?
Mit TPrint.Execute (Dialog) bekomme ich leider nichts gebacken... bei Delphi3 musste ich da nur einfach die Zeile Print; setzen...

[KOBOLD Messring GmbH]

falls Du das meinst: Eine Grafik, die im Programm z.B. in einem TImage vorhanden ist, ausdrucken.
Drucken ist ganz einfach bei Freepascal/Lazarus:

Code: Alles auswählen

USES PrintersDlgs, Printers;
 
Procedure GrafikDrucken;
Begin
{ das ist der Drucker-Dialog, wo man den Drucker auswählt: }
 IF PrintDialog1.Execute 
   THEN Begin
          { das initialisiert den Druckertreiber (oder so was...): }
          Printer.BeginDoc; 
          { das kopiert die Graphik auf den Printer: }
          Printer.Canvas.Draw (10, 10, Image1.Picture.Graphic); 
          { auch skaliert möglich: }
          Printer.Canvas.StretchDraw (Rect (20,20,30,50), Image1.Picture.Graphic);
          { das schickt nun wirklich alles zum Drucker, egal ob lokal, Netzwerk, IPP... : }
          Printer.EndDoc;
        End; { If wirklich der Druckerdialog mit [OK] bestätigt }
End; { GrafikDrucken }

... das wars.

[Lollo67]

@Kobolt: Super, das hab ich gemeint... und es funktioniert! - Vielen Dank dafür!!!