ctext - Ctext a text widget with highlighting support
The ctext package provides the ctext widget which is an enhanced text widget with support for configurable syntax highlighting and some extra commands.
Ctext overloads the text widget and provides new commands, named highlight, copy, paste,cut, append, and edit. It also provides several commands that allow you to define classes. Each class corresponds to a tag in the widget.
Creates and configures a ctext widget.
Highlighting is controlled with text widget tags, that are called highlight classes. The class is a tag name and can be configured like any text widget tag. Four types of highlight classes are supported. All highlight classes are automatically used by the highlight method of the widget.
Add a highlighting class class to the ctext widget pathName. The highlighting will be done with the color color. All words in the keywordlist will be highlighted.
# highlight some tcl keywords ::ctext::addHighlightClass .t tclkeywords red [list set info interp uplevel upvar]
Add a highlighting class class to the ctext widget pathName. The highlighting will be done with the color color. All words starting with char will be highlighted.
::ctext::addHighlightClassWithOnlyCharStart .t vars blue \$
Add a highlighting class class to the ctext widget pathName. The highlighting will be done with the color color. All chars in charstring will be highlighted.
Add a highlighting class class to the ctext widget pathName. The highlighting will be done with the color color. All text parts matching the regexp pattern will be highlighted.
Remove all highlight classes from the widget pathName.
List all highlight classes for the widget pathName.
Delete the highlight class class from the widget pathName
Enable C comment highlighting. The class for c-style comments is _cComment. The C comment highlighting is disabled by default.
Disable C comment highlighting.
Each ctext widget created with the above command supports the following commands and options in addition to the standard text widget commands and options.
Highlight the text between startIndex and endIndex.
Delete text range without updating the highlighting. Arguments are identical to the pathName delete command inherited from the standard text widget.
Insert text without updating the highlighting. Arguments are identical to the pathName insert command inherited from the standard text widget.
Call tk_textCopy for the ctext instance.
Call tk_textCut for the ctext instance.
Call tk_textPaste for the ctext instance.
Append the current selection to the clipboard.
Set the options for the ctext widget. Each option name must be followed the new value.
package require Tk package require ctext proc main {} { pack [frame .f] -fill both -expand 1 pack [scrollbar .f.s -command {.f.t yview}] -side right -fill y pack [ctext .f.t -bg black -fg white -insertbackground yellow -yscrollcommand {.f.s set}] -fill both -expand 1 ctext::addHighlightClass .f.t widgets purple [list ctext button label text frame toplevel scrollbar checkbutton canvas listbox menu menubar menubutton radiobutton scale entry message tk_chooseDir tk_getSaveFile tk_getOpenFile tk_chooseColor tk_optionMenu] ctext::addHighlightClass .f.t flags orange [list -text -command -yscrollcommand -xscrollcommand -background -foreground -fg -bg -highlightbackground -y -x -highlightcolor -relief -width -height -wrap -font -fill -side -outline -style -insertwidth -textvariable -activebackground -activeforeground -insertbackground -anchor -orient -troughcolor -nonewline -expand -type -message -title -offset -in -after -yscroll -xscroll -forward -regexp -count -exact -padx -ipadx -filetypes -all -from -to -label -value -variable -regexp -backwards -forwards -bd -pady -ipady -state -row -column -cursor -highlightcolors -linemap -menu -tearoff -displayof -cursor -underline -tags -tag] ctext::addHighlightClass .f.t stackControl red {proc uplevel namespace while for foreach if else} ctext::addHighlightClassWithOnlyCharStart .f.t vars mediumspringgreen "\$" ctext::addHighlightClass .f.t variable_funcs gold {set global variable unset} ctext::addHighlightClassForSpecialChars .f.t brackets green {[]{}} ctext::addHighlightClassForRegexp .f.t paths lightblue {\.[a-zA-Z0-9\_\-]+} ctext::addHighlightClassForRegexp .f.t comments khaki {#[^\n\r]*} .f.t fastinsert end [info body main] pack [frame .f1] -fill x .f.t highlight 1.0 end pack [button .f1.exit -text Exit -command exit] -side left pack [entry .e] -side bottom -fill x .e insert end "ctext::deleteHighlightClass .f.t " bind .e <Return> {eval [.e get]} } main
Further examples are in the source package for ctext.
Kevin Kenny, Neil Madden, Jeffrey Hobbs, Richard Suchenwirth, Johan Bengtsson, Mac Cody, Günther, Andreas Sievers, and Michael Schlenker.
This document, and the package it describes, will undoubtedly contain bugs and other problems. Please report such in the category ctext of the Tklib Trackers. Please also report any ideas for enhancements you may have for either package and/or documentation.
Copyright © George Peter Staplin <[email protected]>