` Spell checking a memo (Ray Dummer ) - Icetips Article
Icetips - Templates, Tools & Utilities for Clarion Developers

Templates, Tools and Utilities
for Clarion Developers

Icetips Article

Back to article list   Search Articles     Add Comment     Printer friendly     Direct link  

Par2: Spell checking a memo
2000-06-08 -- Ray Dummer
 
!Declare two variables: WordObject long CheckString string(1000) ! string for CheckSpelling !Embed point where you want to check the spelling WordObject=create(0,create:ole) ! create temporary Ole Control WordObject{prop:create}='Word.Document' ! Create MS Word Document Object WordObject{'Application.Visible'}=False ! Hidden Word Window WordObject{'Application.Documents.Add'} ! Create new document WordObject{'Application.Selection.Text'}=CheckString ! Copy checkString into Word WordObject{'Application.ActiveDocument.CheckSpelling'} ! start CheckSpelling CheckString = WordObject{'Application.Selection.Text'} ! Copy CheckString back WordObject{'Application.ActiveWindow.WindowState'}=2 ! close document and Quit from MsWord WordObject{'Application.ActiveDocument.Close(0)'} ! Closing without save WordObject{'close'} WordObject{'Application.Quit'} WordObject{prop:deactivate} Destroy(WordObject)

Today is April 20, 2024, 4:05 am
This article has been viewed 35122 times.


Back to article list   Search Articles   Add Comment   Printer friendly

Login

User Name:

Password:


Gold Subscription
Buy Now
Silver Subscription
Buy Now
Solo Subscription
Buy Now
Multiple Copy Pricing
Renew Subscription