Lo q me dices ya lo sabia y no me vale.
Esta es la solución. Me la dierón en el foro de builder:
// Añadimos: #include <comobj.hpp>
Variant word, doc, sections, footers, footer, range, font;
WideString nombreDoc = "c:\\_Leo.doc";
WideString textoAnyadir = "Texto pie";
word = CreateOleObject("Word.Application");
word.OlePropertySet("DisplayAlerts", false);
doc = word.OlePropertyGet("Documents").OleFunction("Open", nombreDoc);
sections = doc.OlePropertyGet("Sections");
footers = sections.OlePropertyGet("First").OlePropertyGet("Footers");
footer = footers.OleFunction("Item", 1 /*wdHeaderFooterPrimary*/);
range = footer.OlePropertyGet("Range");
font = range.OlePropertyGet("Font");
font.OlePropertySet("Name", "Tahoma");
font.OlePropertySet("Size", 7);
font.OlePropertySet("Italic", true);
font.OlePropertySet("Bold", true);
range.OleProcedure("InsertAfter", textoAnyadir);
doc.OleProcedure("Close", 0xFFFFFFFF /*wdSaveChanges*/);
word.OleProcedure("Quit");
Un saludo.