tcl, text widget: how to get highlighted stuff

nevermind.. ignore me... i should do more reading....

the answer is as follows:

# to get selected text
% .t1 get sel.first sel.last
rfewrfer

# to get the line.char position of the selected text
% .t1 index sel.first
1.3


"Saab Siddiqui" < XXXX@XXXXX.COM > wrote in message
news:bilt3l$1ji$ XXXX@XXXXX.COM ...
> hey y'all...
>
> i am going nuts with this... just cannot seem to figure it out... arrghh!
>
> how the heck do you get highlighted text from a text widget...
>
> basically, i want to get the highlighted text and allow the user to
"strike
> it out".... via the tag strikeout thingie...
>
> thanks,
> saab
>
>

What you want is the "selection", which has it's own section in the text
man page (under the heading "the Selection". You'll also need to read a
little under the Tags section to see how you can qualify tags with
things like ".first" and ".last" amoung others.

Using that information, the answer to your question is this:

set text [.text get sel.first sel.last]

For your purposes you don't need to actually get the text, you just need
to apply your strikethrough tag to the same range as the sel tag:

.text tag add strikethrough sel.first sel.last