[ulis], 2004-01-20. FindWords is an editor utility that let you jump to another occurrence of the selected string. Designed for Textpad it can be used (modified) for other editors. Modified 2004-01-25: Added quotes around the $Sel arg to deal with strings containing spaces. Modified 2004-01-26: Added keyboard support. ---- '''A snapshot''' [http://perso.wanadoo.fr/maurice.ulis/tcl/FindWords.png] ---- '''The script''' ######################### # # FindWords: jump to a string (Textpad utility) # # (C) 2004, ulis; NOL # # ----------------------- # input: source file, selected string # output: exec of a script ######################### if 0 \ { # Abstract This script let you see a listbox with all the occurrences of the selected string, select one of them and have the text cursor positionned in front of the selected one. # Install For Textpad: - Optional: copy the DDEOPN32.EXE utility from the Textpad system directory to the Windows sytem32 or system directory - Put FindWords.tcl & FindWords.cfg in the TextPad system directory (or elsewhere) - With the /Configure/Preferences menu add a new tool with: - Commands = - Parameters = $File "$Sel" - Initial folder = $FileDir (see example below) - Rename this tool: FindWords - Modify FindWords.cfg exec =