Danke für die Antwort das ist genau das was ich gesucht habe
nur wie kann ich jetzt mit einem 2. Programm dieses "Differenzbild" auf das alte bild legen ?
Ich habe es mit png versucht und habe schwarz transpararent gemacht das hatt leider nicht geklappt ...
es wäre sehr nett wenn du mir noch einmal helfen könntest
mfg smallsmoker
€: ich habe die bilder jetzt so zusammen gefügt (habe sie vorhar als jpg gespeichert)
Delphi-Quellcode:
var DiffBMP,Image1:timage;
peg1,peg2:tjpegimage;
begin
diffbmp := timage.Create(nil);
Image1 := timage.Create(nil);
peg1 := tjpegimage.Create;
peg2 := tjpegimage.Create;
peg1.LoadFromFile('image.jpg');
peg2.LoadFromFile('image2.jpg');
diffbmp.Picture.Bitmap.Assign(peg1);
image1.Picture.Bitmap.Assign(peg2);
DiffBMP.Canvas.CopyMode := cmSrcInvert;
DiffBMP.Canvas.Draw(0, 0, Image1.Picture.Graphic);
diffbmp.Picture.Graphic.SaveToFile('bla.bmp');
end;
aber das ergebnis sieht nich so toll aus ... siehe anhang was mache ich falsch ?