Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi 2 png dateien zusammenführen (https://www.delphipraxis.net/145780-2-png-dateien-zusammenfuehren.html)

A-KI 8. Jan 2010 09:05


2 png dateien zusammenführen
 
servus

wie kann ich 2 png dateien übereinander legen und so abspeichern das ich 1 png datei habe?

schon mal danke für eventuelle hilfe

tkone 8. Jan 2010 09:14

Re: 2 png dateien zusammenführen
 
hast du farbeige darstellungen oder s/w darstellungen?
ist ja auch wichtig, wie du damit verfahre willst.
also farben addieren oder subtrahieren.

s.h.a.r.k 8. Jan 2010 10:17

Re: 2 png dateien zusammenführen
 
Oder willst du nur ein Overlay haben? Ich weiß nicht, was passieren würde, wenn auf du auf ein TImage (mit PNG-Support; oder ein TPNGImage)) nochmals eines zeichnest.

A-KI 8. Jan 2010 11:22

Re: 2 png dateien zusammenführen
 
sind 2 farbige
siehe bilder



http://www.abload.de/img/citiesuu5t.png + http://www.abload.de/img/warnings_201001051620outu.png = http://www.abload.de/img/fertig2u2w.png

s.h.a.r.k 9. Jan 2010 14:19

Re: 2 png dateien zusammenführen
 
Du solltest deine Bilder immer als Anhang beifügen und nicht extern speichern, da wenn jemand diesen Thread findet und die Bilder dem Veständnis dienen, so kann es sein, dass der fremde Hoster diese gelöscht hat und der Thread somit unnütz wird.

Hier der Quellcode, mit dem du das bewerkstelligen kannst, was du willst:
Delphi-Quellcode:
users
  pngimage;

{ ... }

var
  png : TPngImage;
begin
  png := TPngImage.Create();
  try
    png.LoadFromFile('C:\Users\<USER>\Desktop\warnings_201001051620outu.png');
    png.Draw(Image3.Canvas, Rect(0, 0, Image3.Width, Image3.Height));

    png.LoadFromFile('C:\Users\<USER>\Desktop\citiesuu5t.png');
    png.Draw(Image3.Canvas, Rect(0, 0, Image3.Width, Image3.Height));
  finally
    FreeAndNil(png);
  end;
Edit: Ich verwende D2010 und da ist TPngImage schon mit drin. Nun weiß ich nicht, wie du da in der Zwischenzeit ran kommst, da CodeGear sich diesen Source mal gekrallt hat.

Klaus01 9. Jan 2010 14:58

Re: 2 png dateien zusammenführen
 
Zitat:

Zitat von s.h.a.r.k
Edit: Ich verwende D2010 und da ist TPngImage schon mit drin. Nun weiß ich nicht, wie du da in der Zwischenzeit ran kommst, da CodeGear sich diesen Source mal gekrallt hat.

Das Internet vergisst nicht so schnell TPngImage.pas

Grüße
Klaus

s.h.a.r.k 9. Jan 2010 15:07

Re: 2 png dateien zusammenführen
 
Hab sogar noch eine Version auf meine Platte gefunden.

[edit=Admin]Attachment auf Wunsch des Autors gelöscht. Mfg, Daniel[/edit]

Die Muhkuh 9. Jan 2010 16:18

Re: 2 png dateien zusammenführen
 
Den Anhang würde ich aber wegmachen ;-) Soweit ich weiß, darf man es nicht verteilen.


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