Hi,
I've come across a problem with images that are animated, and "scaling" the image dimensions down.
The code is:
$x = $image->Read($path);
if ($x) { print "Error: $x"; exit; }
print qq|Debug: geometry=>$_PercentageSmaller \n|;
$x = $image->Scale(geometry=>$_PercentageSmaller);
if ($x) { print "Error: $x"; exit; }
print qq|Debug: filename=>$WriteImage \n|;
$x = $image->Write(filename=>$WriteImage);
if ($x) { print "Error: $x"; exit; }
Attached is a sample image that is made. Anyone got any ideas? :/
TIA
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
I've come across a problem with images that are animated, and "scaling" the image dimensions down.
The code is:
Code:
$image = Image::Magick->new; $x = $image->Read($path);
if ($x) { print "Error: $x"; exit; }
print qq|Debug: geometry=>$_PercentageSmaller \n|;
$x = $image->Scale(geometry=>$_PercentageSmaller);
if ($x) { print "Error: $x"; exit; }
print qq|Debug: filename=>$WriteImage \n|;
$x = $image->Write(filename=>$WriteImage);
if ($x) { print "Error: $x"; exit; }
Attached is a sample image that is made. Anyone got any ideas? :/
TIA
Andy (mod)
andy@ultranerds.co.uk
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package | GLinks ULTRA Package PRO
Links SQL Plugins | Website Design and SEO | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!