>John,
>
>So if I'm running VFP 5.0a and Word 97 and it should work do you have idea why it wouldn't? If I can't get this spell check to work using word I'll have to find a 3rd party vendor that will integrate with VFP. Would you have any suggestions? Any help would be much appreciated.
>
>Thank you.
>
>Piper
Change the code in the class to the following:
if type('thisform.owordDoc')<>'O'
Thisform.addobject('oWordDoc','olecontrol','word.document')
endif
if len(allt(this.value))<3
messagebox('You must have a string longer than 3 characters')
return
endif
acti wind debug
thisform.oworddoc.width=0
thisform.oworddoc.height=0
With Thisform.oWordDoc
.DoVerb(0)
.Object.Content = This.value
.CheckSpelling && this will put us in a wait state while the spell checking occurs
.Object.Application.Selection.WholeStory
This.Value = .Object.Application.Selection.Text
.Close(.f.)
EndWith
** The width and height settings are what allowed the object to be visible.
John
John Harvey
Shelbynet.com
"I'm addicted to placebos. I could quit, but it wouldn't matter." Stephen Wright