Select Code to Download

sub OnBold {
   my $this = shift;
   my $item = $this->GetItem(1);
...
   $item->SetFont($f);
   $this->SetItem($item);
} #1    end sub OnBold

# taken from: http://wxpython-users.1045709.n5.nabble.com/ListCtrl-Set
+ItemTextColor-SetItemFont-td2348263.html (main.py)
# ported 23 3 2013 v 0-1
use strict;
...
$app->MainLoop;

1;