[Chart] GD Font - #157231 (Fragen zu Perl-Modulen)

Kean

2012-04-04 11:50

User since
2004-08-18
463 Artikel
BenutzerIn

user image

Ich beschäftige mich immer noch mit dem Thema Charts und bin mittlerweile bei dem Modul Chart gelandet. Das ganze sieht bis auf die Beschriftung auch ziemlich ordentlich aus.

Als Schriften können nur GD Fonts genommen werden. Gibt es eine Möglichkeit ein GD Font aus einer TrueType Schriftart zu generieren?

Hier mal der Quellcode bis jetzt:

Code (perl): (dl )

use strict;
use Chart::StackedBars; #   (type is one of: Points, Lines, Bars, LinesPoints, Composite,StackedBars, Mountain, Pie, HorizontalBars, Split, ErrorBars, Pareto, Direction) 
use GD;

my $font = GD::Font->Giant;

my $obj = Chart::StackedBars->new (740,430);

$obj->set (     'title' => "Jahresübersicht 2012",
                                'legend' => 'none', 
                                'y_grid_lines' => 'true',
                                'title_font' => $font,
                                'precision' => 0, 
                                'min_val' => 0,
                                'colors' => {'grid_lines' => [192,192,192]}
                );
                                
 
@data = ( [ 'Januar', 'Februar', 'März', 'April', 'Mai', 'Juni', 'Juli', 'August', 'September', 'Oktober', 'November', 'Dezember' ],
            [ 150,  180,  210, 190, 175 ] );

$obj->png ( "chart.png", \@data );