A
Andrew Fiddian-Green
Can anyone please suggest to me why the second call to
GetSpellingSuggestions() below raises an exception when the first one works
fine?
VarCustDict := 'C:\myPath\myDictionary.dic';
VarLang := wdEnglish;
VarDict := fWordApp.Languages.Item(varLang).NameLocal;
lSuggestions :=
fWordDoc.Range.GetSpellingSuggestions(VarCustDict,
EmptyParam,
VarDict,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam);
VarLang := wdFrench; // for example...
VarDict := fWordApp.Languages.Item(varLang).NameLocal;
lSuggestions :=
fWordDoc.Range.GetSpellingSuggestions(VarCustDict,
EmptyParam,
VarDict,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam);
Regards,
AndrewFG
GetSpellingSuggestions() below raises an exception when the first one works
fine?
VarCustDict := 'C:\myPath\myDictionary.dic';
VarLang := wdEnglish;
VarDict := fWordApp.Languages.Item(varLang).NameLocal;
lSuggestions :=
fWordDoc.Range.GetSpellingSuggestions(VarCustDict,
EmptyParam,
VarDict,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam);
VarLang := wdFrench; // for example...
VarDict := fWordApp.Languages.Item(varLang).NameLocal;
lSuggestions :=
fWordDoc.Range.GetSpellingSuggestions(VarCustDict,
EmptyParam,
VarDict,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam,
EmptyParam);
Regards,
AndrewFG