Select Code to Download

         -------------------------------------
Chooser: |  Foo  (how to make this white?) |V|
...
            | Bar                           |
            | Bas                           |
            ---------------------------------

#!/usr/bin/perl
use strict;
...
#What else can I configure to a different color??

MainLoop;

my $dd = $mw->BrowseEntry(
   -label       => 'Chooser',
...
   -disabledforeground => '#000000',
   -disabledbackground => '#FFFFFF',
)->pack();