我正在尝试提醒用户某些数据已被更改并需要保存。数据显示在Perl的Tk :: HList框中。我希望我能做到:
if ($new_item) {
$HList->add($stock_no,-background=>"red");
}
甚至:
if ($new_item) {
$HList->itemCreate($stock_no,0,-text=>$stock_no,-background=>"red");
}
但两人都扔了
Tk::Error: Bad option `-background'
我已经看到了使用ItemStyle的想法,但如果有效或无效,或者它是最好的(也是唯一的)解决方案,则没有明确的答案。是否有另一种方法可以突出显示某些行以提醒用户?
答案 0 :(得分:0)
看起来这是改变背景的最佳方式:
use Tk::ItemStyle;
my $alert = $mw->ItemStyle('text',-background=>"red");
$HList->itemCreate($stock_no,0,-style=>$alert);
我必须将这个样式包含在我添加的每个项目中,似乎没有办法一次完成整行。