MS Spell Checking API

[mLipok]

I saw here on the forum few different ways of checking spell:
Spell Checker (by iCode)
OpenOffice/LibreOffice Spell Checker (by GMK) 
v0.1.1 Scite4AutoIt SpellChecker using LibreOffice

even few topics about spell checking with Word.
Custom Spell Checker

But I start wondering how Notepad in Windows 11 finds out that some words are written incorrectly.

Then I ask ChatGPT about and he point me to Spell Checking API.

https://learn.microsoft.com/en-us/windows/win32/intl/about-the-spell-checker-api

So here is my question: Has anyone worked in AutoIt with MS Windows Spell Checking API ?



EDIT:
https://github.com/microsoft/Windows-classic-samples/blob/main/Samples/SpellCheckerClient/cpp/SampleSpellingClient.cpp

Edited 10 hours ago by mLipok

[mLipok]

btw.
It is little funny (as I did many COM stuff in AutoIt) but ....

I'm not familiar with ObjCreateInterface() and for this reason at first I also asked ChatGPT for example:
 

expandcollapse popup

#include <MsgBoxConstants.au3>

; === COM interface GUIDs (global constants) ===
Global Const $CLSID_SpellCheckerFactory = "{7AB36653-1796-484B-BDFA-E74F1DB7C1DC}"
Global Const $IID_ISpellCheckerFactory = "{8E018A9D-2415-4677-BF08-794EA61F94BB}"
Global Const $IID_ISpellChecker = "{B6FD0B71-E2BC-4653-8D05-F197E0D3B83B}"

; === Interface definitions (global tags) ===
Global Const $TAG_ISpellCheckerFactory = _
        "CreateSpellChecker hresult(wstr;ptr*);" & _ ; Create spell checker for language
        "get_SupportedLanguages hresult(ptr*);"  ; Get supported languages

Global Const $TAG_ISpellChecker = _
        "Check hresult(wstr;ptr*);" & _ ; Check text for spelling errors
        "Suggest hresult(wstr;ptr*);" ; Get suggestions

; === Example entry point ===
_EXAMPLE()

Func _EXAMPLE()
    ; Create SpellCheckerFactory COM object
    Local $oFactory = ObjCreateInterface( _
            $CLSID_SpellCheckerFactory, _
            $IID_ISpellCheckerFactory, _
            $TAG_ISpellCheckerFactory)

    If @error Then
        MsgBox($MB_ICONERROR, "Error", "Failed to create SpellCheckerFactory")
        Return
    EndIf

    ; Create spell checker for Polish language
    Local $pSpellChecker = 0
    $oFactory.CreateSpellChecker("pl-PL", $pSpellChecker)

    If $pSpellChecker = 0 Then
        MsgBox($MB_ICONERROR, "Error", "Failed to create SpellChecker for pl-PL")
        Return
    EndIf

    ; Bind ISpellChecker interface
    Local $oSpell = ObjCreateInterface($pSpellChecker, $IID_ISpellChecker, $TAG_ISpellChecker)

    If @error Then
        MsgBox($MB_ICONERROR, "Error", "Failed to bind ISpellChecker interface")
        Return
    EndIf

    ; Word to test
    Local $sWord = "ksionszka"

    ; Perform spell check
    Local $pErrors = 0
    $oSpell.Check($sWord, $pErrors)

    ; NOTE: This is simplified logic!
    ; Proper implementation should enumerate IEnumSpellingError
    If $pErrors = 0 Then
        MsgBox($MB_ICONINFORMATION, "Result", "Word is correct: " & $sWord)
    Else
        MsgBox($MB_ICONWARNING, "Result", "Word is INCORRECT: " & $sWord)
    EndIf
EndFunc   ;==>_EXAMPLE

of course not works well.