在Delphi中使用Word对象，如何使用wdPeplaceAll等VBA自带的常量，以及如何转换

wApp.Selection.Find.ClearFormatting;
    wApp.Selection.Find.Replacement.ClearFormatting;
    wApp.Selection.Find.Text:=docText;
    wApp.Selection.Find.Replacment.Text:=newText;
    wApp.Selection.Find.Forward:=True;
    wApp.Selection.Find.Wrap:=wdFindContinue;
    wApp.Selection.Find.Format:=False;
    wApp.Selection.Find.MatchCase:=False;
    wApp.Selection.Find.MatchWholeWord:=True;
    wApp.Selection.Find.MatchByte:=True;
    wApp.Selection.Find.MatchWildcards:=False;
    wApp.Selection.Find.MatchSoundsLike:=Fasle;
    wApp.Selection.Find.MatchAllWordForms:=Fasle;
    wApp.Selection.Find.Execute(Replace:=wdReplaceAll);
等
wdReplaceAll，wdFindContinue均提示有错
已经Uses COMOBJ