How to delete a row from a table in tcl.tk

[newtcl]

Hi,
I am trying to delete rows from a table. I know I need to get the index of the selected rows. Can anybody help me with this question ? Thanks.
The syntas I am using is ---
%W delete rows rowindex count

 

[Bong]

I use:

.t delete rows [.t index active row] 1
Bob Rashkin
rrashkin@csc.com