Perl/Tk: Aligning the text in BrowseEntry listbox

333 views Asked by At

I have a BrowseEntry of which the text is right aligned as in below code.

my $brEntry = $mw->BrowseEntry(
                    -variable => \$var,
                    -state => 'readonly',
                    -justify => 'right'
              )->pack(-side => 'left', -expand => 'yes', -fill => 'both');

But the drop-down list of this BrowseEntry comes with the text left aligned. I need to right align the text inside this list also. Is there a way I can do this?

I tried by

$brEntry->Subwidget('slistbox')->configure(-justify => 'right');

But this does not work and it gives error.

0

There are 0 answers