Du musst das PNG erst auf ein Bitmap kopieren, zum Speichern umgekehrt:
Delphi-Quellcode:
var
Bmp: TBitmap;
Png: TPNGObject;
begin
Bmp := nil;
Png := nil;
try
Bmp := TBitmap.Create;
Bmp.Assign(myImage.Picture.Graphic);
Bmp.Canvas.…(…);
Png := TPNGObject.Create;
Png.Assign(Bmp);
Png.SaveToFile(…);
finally
Bmp.Free;
Png.Free;
end;
end;