我的应用程序需要大量的PNG,我经常在尝试使用它们时弄乱我的代码。为了让我的生活更轻松,我用Realword Paint制作了一个大的PNG图像,并将所有这些小的PNG图像粘贴到上面。现在我只有一个文件了。现在我所需要的就是将一个PNG复制到另一个透明的PNG(顺便说一句,不要问为什么),因为我需要处理每个图像。当涉及到处理图像时,我是一个糟糕的程序员。我使用的是Delphi 7。
PGNImage.Resize
procedure TPngObject.Resize(const CX, CY: Integer);
function Min(const A, B: Integer): In