Bintuch has asked for the wisdom of the Perl Monks concerning the following question:

I'm using Tk Checkbutton widget. I'm facing a small (but irritating) problem.

Whenever I hover with the Mouse over the Checkbutton, the background of the box is changing and I can't find a way to change it without changing the background of the entire widget.

I want that the background of the widget will be always gray and the box itself to be always white.

Can you help??

Replies are listed 'Best First'.
Re: Background Color - Tk Checkbutton
by shmem (Chancellor) on Jul 12, 2010 at 08:29 UTC

    Use -activebackground and -activeforeground: 

    #!/usr/bin/perl

use Tk;
my $mw = MainWindow -> new;
my $ck = $mw -> Checkbutton(
    -activebackground => 'gray',
    -activeforeground => 'black',
    -background => 'gray',
    -foreground => 'black',
    -text => 'Tic me',
)->pack;

MainLoop;

    [download]
[reply]
[d/l]
[select]

      It doesn't work.

      The background of the widget is always gray but the box itself changes from white to gray upon mouse hover.

[reply]
[reply]
Re: Background Color - Tk Checkbutton
by IanVand (Initiate) on Aug 30, 2012 at 21:01 UTC
    I had the same problem. Use the normal state instead of the active state. 
    $your_checkbox -> configure(-state => 'normal');

    [download]
[reply]
[d/l]

Back to Seekers of Perl Wisdom