General information
Category:
Coding, syntax & commands
Title:
CheckSpelling using VFP with Word
*** OLE Control Event *** (DblClick of RTFTextBox ActiveX)
if type('thisform.owordDoc')<>'O'
Thisform.addobject('oWordDoc','olecontrol','word.document')
endif
With Thisform.oWordDoc
.DoVerb(0)
.Object.Content = This.Text
.CheckSpelling
.Object.Application.Selection.WholeStory
This.text = .Object.Application.Selection.Text
** .Close(0)
EndWith
thisform.removeobject("oWordDoc")
***********************************************
With this code is possible check simple text.
I need check RTF. I want pass the TEXTRTF property to
SpellChecker of the Word, that shows o formatted text
and I want that return in RTF too.
Excuse my english.
Someone can I help me, please?
Paulo Barros
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only