0

我试图提醒用户某些数据已更改并且需要保存。数据显示在 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 的想法,但没有明确的答案是否有效,或者它是否是最好的(也是唯一的)解决方案。是否有另一种方法可以突出显示某些行以提醒用户?

4

1 回答 1

0

看起来这是更改背景的最佳方法:

use Tk::ItemStyle; 

my $alert = $mw->ItemStyle('text',-background=>"red");

$HList->itemCreate($stock_no,0,-style=>$alert);

我必须在我添加的每个项目中包含该样式,似乎没有办法一次完成整行。

于 2012-03-16T18:32:24.033 回答