Zur Startseite

JRSpellChecker

Zur Homepage

ChangeWord(ByVal NewWord As String)

Description:

this event will be fired, if the user want to change a selected word with the internal correction dialogue. (SpellCheckWithDialog)

The correction dialogue selects the incorrect word.
To change the word, you must write a own function (see example).

       
         

ico_weitere Return value:


NewWord

the new word to use.

Example RTF-Control:

    Private Sub JRSpell1_ChangeWord(NewWord As String)     Form1.RichTextBox1.SelText = NewWord
        'If we want select the changed word
        'Form1.RichTextBox1.SelStart = JRSpell1.SpellInfo_SelStartpos
        'Form1.RichTextBox1.SelLength = JRSpell1.SpellInfo_SelLength +JRSpell1.SpellInfo_StartposOffset
    End Sub

Example TX-Textcontrol:

    Private Sub JRSpell1_ChangeWord(NewWord As String) TXTextControl1.SelText = NewWord
    'If we want select the changed word
    'TXTextControl1.SelStart = JRSpell1.SpellInfo_SelStartpos
    'TXTextControl1.SelLength = JRSpell1.SpellInfo_SelLength+JRSpell1.SpellInfo_StartposOffset
    End Sub

Example Textbox:

    Private Sub JRSpell1_ChangeWord(NewWord As String)
      Text1.SelText = NewWord
      'If we want select the changed word
      'Text1.SelStart = JRSpell1.SpellInfo_SelStartpos
      'Text1.SelLength = JRSpell1.SpellInfo_SelLength +JRSpell1.SpellInfo_StartposOffset
    End Sub