Witam,
chciałem uzyskać następujący efekt: załącznik efekt_dobry.png
ale uzyskuje tylko: załącznik efekt_zly.png
próbowałem robić to tak:
zoom := TPNGObject.Create;
zoom.LoadFromFile('zoom.png');
png_tmp := TPNGObject.Create;
png_tmp.LoadFromFile('szkielko_male.png');
png_tmp.Canvas.Draw(0,0,zoom)
png_tmp.SaveToFile('zoom2.png');
druga metoda:
pole:TRect;
zoom := TPNGObject.Create;
zoom.LoadFromFile('zoom.png');
png_tmp := TPNGObject.Create;
png_tmp.LoadFromFile('szkielko_male.png');
pole.TopLeft := Point(0,0);
pole.BottomRight := Point(500,500);
png_tmp.Draw(zoom.Canvas,pole);
png_tmp.SaveToFile('zoom2.png');
lecz w przypadku drugiej metody w pliku wyjściowym otrzymałem tylko samo szkielko (png_tmp)
Problem w tym, że nie wiem jak nałożyć zoom na szkiełko tak, aby zoom nie robił się przeźroczysty.