Textumgang (Graphische Oberflächen)

[thread]4960[/thread]

Textumgang

J-jayz-Z

2005-04-20 15:47

User since
2005-04-13
625 Artikel
BenutzerIn

Hi,

ich brauch dringend ein paar Ansätze, wie ich Text in Tk bearbeiten kann. Zum Beispiel unterstreichen, andere Schriftfarbe, Schriftgröße, Schriftart oder gar unterstrichen oder kursiv...
Sorry, hab nix dazu gefunden..:-(

thx schonmal

perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'

http://perl-tutor.de

Froschpopo

2005-04-20 15:48

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

z.B. so:

Code: (dl )

-font => '{Arial} 9 {normal}'

anstelle von normal kannst du z.b. bold, underline etc. nehmen.

Bei mir stellt Linux die Schrift teilweise etwas anders dar... deshalb mach ich gelegentlich sowas in der Art wie:

Code: (dl )

-font => $^O eq 'MSWin32' ? '{Arial} 9 {normal}' :'{Helvecita}10 {normal}'

\n\n

Crian

2005-04-20 20:22

User since
2003-08-04
5866 Artikel
ModeratorIn

s~fond~font~

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

View all threads created 2005-04-20 15:47.