Quiq::Gd::Component::ColorLegend - Legende zu einem Farb-Plot
Quiq::Gd::Component
Grafischer Aufbau der Legende:
[SVG kann nicht in POD eingebettet werden]
Breite der Legende in Pixeln.
Farbe der Achse, also der Linie und der Ticks.
Array der Farben.
Kleinster Wert des Wertebereichs.
Größter Wert des Wertebereichs.
Die Skala erhält eine logarithmische Einteilung (Basis 10).
Farbe der Beschriftung.
Font für die Beschriftung.
Breite der Überschreitungsblöcke in Pixeln. Hat nur eine Bedeutung, wenn ltColor und/oder gtColor definiert sind.
ltColor
gtColor
Höhe der Farbblöcke in Pixeln.
Lücke zwischen den Farbblöcken in Pixeln. Hat nur eine Bedeutung, wenn blockLtColor und/oder blockGtColor definiert sind.
blockLtColor
blockGtColor
Farbe des Blocks, der die Werte, die min unterschreiten, repräsentiert.
Farbe des Blocks, der die Werte, die max überschreiten, repräsentiert.
Titel (optional).
Farbe des Titels.
Font des Titels.
Vertikale Lücke zwischen dem Titel und den Farbblöcken in Pixeln.
Eine Farblegende mit Titel. Die Höhe des Bildes geben wir nicht vor, sie richtet sich nach der Höhe der Grafik. Wir ermitteln sie mit $g->height. Die Farben definieren wir erst beim Rendern, da das Bild bei der Instantiierung des Grafik-Objekts noch nicht existiert.
my $width = 400; my $g = Quiq::Gd::Component::ColorLegend->new( title => 'Test', titleFont => Quiq::Gd::Font->new('Blob/font/pala.ttf,14'), labelFont => Quiq::Gd::Font->new('Blob/font/pala.ttf,10'), width => $width, min => 0, max => 100, logarithmic => 0, blockWidth => 50, blockHeight => 18, blockGap => 20, ); $img = Quiq::Gd::Image->new($width,$g->height); my $white = $img->background('ffffff'); $img->transparent($white); $g->render($img,0,0, colors => scalar $img->rainbowColors(512), blockLtColor => $img->color('000080'), blockGtColor => $img->color('ff00ff'), titleColor => $img->color('ff00ff'), labelColor => $img->color('ff00ff'), );
Erzeugte Grafik (der Rahmen ist per CSS hinzugefügt):
[Bild nur im Browser sichtbar]
$g = $class->new(@keyVal);
Instantiiere die Legende mit den Eigenschaften @keyVal (s. Abschnitt ATTRIBUTES) und liefere eine Referenz auf das Objekt zurück.
$g->render($img,$x,$y,@keyVal); $class->render($img,$x,$y,@keyVal);
Zeichne die Legende in Bild $img an Position ($x,$y).
$height = $g->height;
Liefere die Höhe der Legende. Die Höhe wird aus den Komponenten berechnet.
1.204
Frank Seitz, http://fseitz.de/
Copyright (C) 2022 Frank Seitz
This code is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Quiq, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Quiq
CPAN shell
perl -MCPAN -e shell install Quiq
For more information on module installation, please visit the detailed CPAN module installation guide.