[lcarlos]

Buenas, ya tengo la solución , la pongo por si a alguien le sirve.

Salu2.

Código Delphi [-]
 
var
  Word: TWordApplication;
  Doc: TWordDocument;
 
begin
  Word := TWordApplication.Create(Application);
  word.Connect;
  Doc := TWordDocument.Create(Application);
  Doc.ConnectTo(
    IDispatch(OleContainer.OleObject) as _Document);
  // Valor de los parámetros
  r:= Doc.Range;
  tipo:= wdfieldmergefield;
  texto := ElCampo;
  formato:= true;
  // Añado el campo.
  Word.Selection.Fields.Add(Word.Selection.Range, tipo, texto, formato);
  // Oculto los códigos del campo
  Word.ActiveWindow.View.ShowFieldCodes := false;
 
end;