Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Word 2002 Spell Check
Message
From
17/05/2002 09:48:39
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Word 2002 Spell Check
Miscellaneous
Thread ID:
00658155
Message ID:
00658155
Views:
47
We have a VFP5 app that extensively calls the Word spell check to correct edit boxes. This works everywhere except with Word 2000 and 2002. The user receives a function argument error when they click the button that calls Word. We've had some folks tell us it's the MOVE command in certain resolution settings that is giving us the problem, but we've played with that with no success. Any ideas? The code is:

goWord = CREATEOBJECT([WORD.APPLICATION])
WITH goWord
.WINDOWSTATE= 0
.MOVE(500,500)
goWordDoc = .Documents.ADD
ENDWITH
WITH goWordDoc
.Content.TEXT = ALLTRIM(THISFORM.pageframe1.page3.edit2.value)
.ACTIVATE
IF .SpellingErrors.COUNT > 0
.CHECKSPELLING
ELSE
=MESSAGEBOX([Spell check complete. No errors found],0,[Spell Check])
ENDIF
goWord.VISIBLE = .F.
thisform.pageframe1.page3.edit2.VALUE = .Content.TEXT
ENDWITH
thisform.closeword()
Reply
Map
View

Click here to load this message in the networking platform