Enjoy< save a lot of editing tables...lol
works by calling to a word doc, in the background and invisible. when u TYPO it Grabs focus on the .doc and seizes control from Hal , when u hit auto correct, it corrects the issues and releases Hal. The correct spelling is entered into Hal automatically.
Turn off Grammar as Hal ,dont care about , / ' ; .
Some form of microsshhittt word most be installed,or ur just gonna get an ActiveX error ,Call to non-existent software. lol
Rem Type=Plugin
Rem Name=Spell Checker
Rem Author=cyberjedi
Rem Host=Assistant
'This sub sets up the plug-in's option panel in Hal's options dialog
Sub OptionsPanel()
lblPlugin(0).Caption = "Go Big or Go Home"
lblPlugin(0).Move 120, 120, 3300, 1200
lblPlugin(0).WordWrap = True
lblPlugin(0).Visible = True
End Sub
Rem PLUGIN: PRE-PROCESS
Dim Word, Doc, misspelled, spelledrite
Const SpellingAndGrammar = 828
Const dontsavechanges = 0
misspelled = InputString
Set Word = CreateObject("Word.Application") "<<<<<<<< This is the key, WORD, make sure and erase this remark before u save this to a .uhp, lol."
Set Doc = Word.Documents.Add
Word.Selection.Text = misspelled
Word.Dialogs(SpellingAndGrammar).Show
If Len(Word.Selection.Text) <> 1 Then
spelledrite = Word.Selection.Text
Else
spelledrite = misspelled
End If
Doc.Close dontsavechanges "<<<<<<<(remove this too )This is where word closes out ,and exits the doc.""""""
Word.Quit
InputString = spelledrite