Hi
How can I run 'word spell check' on text boxes?
I found something but it's not nature and has problems.
here is this

oWord=CREATEOBJECT("Word.Application")
oWord.WindowState=2
_CLIPTEXT=thisform.edit1.value
oWord.Documents.Add.Content.Paste
oWord.ActiveDocument.CheckSpelling()
oWord.Visible=.F.
=oWord.ActiveDocument.Select
cText=oWord.Selection.Text
cText=LEFT(cText,LEN(cText)-1)
REPLACE thisform.edit1.value WITH cText
_CLIPTEXT=""
oWord.Documents.Close(0)
oWord.Quit(0)