WA1.ActiveDocument.SaveAs(Addr1);
var WordApp: Variant; ... WordApp.FileSaveAs(Name:= 'c:\temp.doc', Format:= 11);
Я не понял Вашего вопроса, но всё же Вам на него отвечу!