Font
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]5139[/thread]

Canvas -> text -> Farbe

Reader: 1


<< >> 2 entries, 1 page
master
 2005-12-09 15:06
#45096 #45096
User since
2003-10-20
610 articles
BenutzerIn
[default_avatar]
Wie ändere ich die Farbe des Textes?

Code: (dl )
1
2
3
4
5
6
7
8
9
10
my $c1 = $scr->Canvas(
-background => "#FF8000",
-borderwidth => 0,
-relief => "flat",
);

$c1->place( -x => 0, -y => 0, -height => $image_height, -width => $image_width);

$c1->createText(int($image_width/2), int($image_height/2), -text => 'Diese ist ein Textbeispiel',
-font => "{MS Sans Serif} 14 {bold}");
\n\n

<!--EDIT|master|1134133621-->
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;
master
 2005-12-09 15:22
#45097 #45097
User since
2003-10-20
610 articles
BenutzerIn
[default_avatar]
ah ich habs..
Code: (dl )
-fill => 'white'
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;
<< >> 2 entries, 1 page



View all threads created 2005-12-09 15:06.