Tk und Umlaute - #109703 (Graphische Oberflächen)

FIFO

2008-05-14 22:46

User since
2005-06-01
469 Artikel
BenutzerIn

user image

Code (perl): (dl )

use strict;
use warnings;
use Tk;
require Tk::Dialog;

my $top = tkinit ();

my $DialogRef = $top->Dialog(
    -title          => "Titel...",
    -text           => "äöüß",
    -default_button => "ok",
    -buttons        => [qw/ok/],
);

$DialogRef->Show(-global);

MainLoop;

Das funktioniert hier problemlos (AP 5.8.8.822, Win32). Hast Du die Umlaute direkt im String oder liest Du was aus Dateien ein? Unter Win32-Bedingungen muss man Dateien ggf. mit dem richtigen Encoding öffnen:

Code (perl): (dl )

open(HANDLE, '< :encoding(cp1252)', $file)

Mehr fällt mir nicht ein, hatte bei der Ausgabe nie Probleme ...

Everyone knows that debugging is twice as hard as writing a program in the first place. So if you're as clever as you can be when you write it, how will you ever debug it? -- Brian Kernighan: "The Elements of Programming Style"