Feldfarbe von BrowseEntry mit readonly - #45348 (Graphische Oberflächen)

ptk

2006-04-13 22:46

User since
2003-11-28
3645 Artikel
ModeratorIn
[default_avatar]

Tk::BrowseEntry wurde in Tk4*-Zeiten entwickelt, als es noch keinen readonly-State für Tk::Entry-Widgets gab. Deshalb wird intern noch immer disabled verwendet. Und auf disabled hat -readonlybackground keinen Einfluss. Der beste Fix wäre also der hier:

Code: (dl )

        $entry->configure( -state => $Tk::VERSION >= 804 ? 'readonly' : 'disabled' );

in Zeile 409 von BrowseEntry.pm