* Created: 10/23/11 10:57:18 PM
Lparameters lxParam1
****************************************************************
****************************************************************
* Standard prefix for all tools for Thor, allowing this tool to
* tell Thor about itself.
If Pcount() = 1 ;
And 'O' = Vartype (lxParam1) ;
And 'thorinfo' = Lower (lxParam1.Class)
With lxParam1
* Required
.Prompt = 'GoFish4' && used when tool appears in a menu
.Description = 'Advanced Code Search Tool.' && may be lengthy, including CRs, etc
.PRGName = 'Thor_Tool_GoFish4' && a unique name for the tool; note the required prefix
* Optional
.StatusBarText = 'GoFish4'
.Summary = 'Code Search Tool' && if empty, first line of .Description is used
.AppName = 'GoFish4.app' && no path, but include the extension; thus GoFish4.App
.FullAppName = 'D:\WORK\UTIL\THOR\THOR\TOOLS\APPS\GOFISH\GOFISH4.APP' && full path to APP
.FolderName = 'D:\WORK\UTIL\THOR\THOR\TOOLS\APPS\GOFISH' && full path to APP
.Classes = 'loGoFish = gofishsearchengine of lib\gofishsearchengine.vcx|http://vfpx.codeplex.com/wikipage?title=GoFishSearchEngine' &&, separated by commas. e.g., 'thorinfo of thor_utils'
* For public tools, such as PEM Editor, etc.
.Source = 'GoFish' && e.g., 'PEM Editor'
.Version = '4.1.221' && e.g., 'Version 7, May 18, 2011'
.Author = 'Matt Slay'
.Sort = 1 && the sort order for all items from the same .Source
.Category = ''
.Link = 'http://vfpx.codeplex.com/wikipage?title=GoFish'
Endwith
Return lxParam1
Endif
Do ToolCode
Return
****************************************************************
****************************************************************
* Normal processing for this tool begins here.
Procedure ToolCode
Do 'D:\WORK\UTIL\THOR\THOR\TOOLS\APPS\GOFISH\GOFISH4.APP'
EndProc