Thread [Image::Magick] Rechteck ohne Füllung (5 answers)
Opened by jan99 at 2013-10-09 12:03

GUIfreund
 2013-10-13 14:40
#171136 #171136
User since
2011-08-08
559 Artikel
BenutzerIn
[default_avatar]
Vielleicht willst du ja einfach nur ein farbiges Rechteck zeichnen.
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

# Objekt für Bilder erzeugen
my $img = Image::Magick->new();

 # Bildgröße setzen
$err = $img->Set(size=>'30x20');
die "$err" if "$err";

 # Bild mit Farbe erzeugen
my $color_hex = sprintf "#%02X%02X%02X",0,255,0;   # grün
$err = $img->ReadImage("xc:$color_hex");
die "$err" if "$err";

$err = $img->Draw(primitive=>'rectangle', points=>'10,1 15,19', 
    stroke=>'Black',
    fill => 'orange',
);
die "$err" if "$err";

Anmerkungen:
- Das Rechteck habe ich etwas niedriger gemacht, damit es ins Bild passt.
- Da ich mich mit Image::Magick nur wenig auskenne, prüfe ich überall auf Fehler.
Gruß
GUIfreund

View full thread [Image::Magick] Rechteck ohne Füllung