Bonjour,
Je suis actuellement en train de tester toutes les fonctions de l'interface Perl de ImageMagick...
Hela, bien que la création d'image et l'instertion de forme fonctionnent correctement, je n'arrive pas a utiliser la fonction Annotate "fonction permettan t d'ecrire dans l'image..." Aucun message d'erreur ne s'affiche, et le script s'execute bien...
Voila mon code
L'image resultant correspond bien au script, mise a part l'absence du texte...J'ai cherché mais n'ai pas trouvé l'erreur!!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 use Image::Magick; use strict; use warnings; use Carp; my $image = Image::Magick->new; $image->Set(size=>'300x300'); $image->ReadImage('xc:white'); $image->Border(bordercolor=>'black',width=>'1', height=>'1'); $image->Draw(primitive=>'line',points=>"10,150 290, 150", stroke=>'NavyBlue'); $image->Annotate(font=>'arial',text=>"Image Magick"); $image->Write(filename=>'image.png', compression=>'None');
Si quelqu'un a une idée???
Merci beaucoup
Partager