Einzelnen Beitrag anzeigen

Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#5

Re: 2 png dateien zusammenführen

  Alt 9. Jan 2010, 15:19
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.
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
  Mit Zitat antworten Zitat