Opened by Froschpopo at 2007-12-23 09:44
User since
2006-07-10
2611 Artikel
BenutzerIn
2006-07-10
2611 Artikel
BenutzerIn
Allso bei mir funktioniert es.
Machst du eine Fehlerabfrage?
Mach das auch beim laden, Damit du sicher bist, das das Bild auch geladen ist.
Hast du mehrer Bilder oder eine Animation geladen?
Dann musst du jedes Bild einzeln ansprechen:
Allso das funktioniert bei mir:
Machst du eine Fehlerabfrage?
Mach das auch beim laden, Damit du sicher bist, das das Bild auch geladen ist.
Hast du mehrer Bilder oder eine Animation geladen?
Dann musst du jedes Bild einzeln ansprechen:
Code (perl): (dl
)
$$image[$_]->Crop(geometry => "100x100+0+$offset") for(0..$#{$image});
Allso das funktioniert bei mir:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#!/usr/bin/perl
use strict;
use warnings;
use Image::Magick;
my $file='/home/topeg/bilder/gifs/test4.gif';
my $x;
my $offset=0;
my $img=Image::Magick->new;
$x=$img->Read($file);
warn "$x\n" if "$x";
for my $nr (0..$#{$img})
{
$x=$$img[$nr]->Crop(geometry => "100x100+0+$offset");
warn "$x\n" if "$x";
}
$x=$img->Display();
warn "$x\n" if "$x";