package require Tk
package require Tablelist
tablelist::addOakleyCombobox
::tablelist::tablelist .tbl \
-columns "0 A center 0 B center 0 C center" \
-stretch all \
-showseparators 1
pack .tbl -side top -fill both -expand yes
.tbl insert end ""
proc createWindow {tbl row col w} {
button $w -text OK
}
.tbl cellconfigure 0,1 -window createWindow
如何在确定按钮周围制作红色边框。我希望它在整个细胞中扩展。像这样的东西
按钮不是必需的。需要红色边框来突出单元格中的错误。