[LIGERO]

Buenas amigos:

He estado buscando por todos los sitios como acceder a los campos de una plantilla creada en Word pero lo que he visto no me ha solucionado el problema.

He visto codigo en el que se utiliza para acceder a los campos codigo como este, pero yo por mucho que lo intento, Variables no lo veo definido en el tipo TwordApplication.

If FileExists (Fich) Then
 begin
   documento:=Word.Documents.Open(Fich);
   for I := 1 to Documento.Variables.Count do
   begin
    NomVar:=Documento.Variables.Item(I).Name;
    Case NomVar[1] of
     'N': documento.Variables.Item(I).Value:= DM.ADODataSet4Nombre.AsString+
                                   ' '+ DM.ADODataSet4Apellido1.AsString+' '+
                                   DM.ADODataSet4Apellido2.AsString;
     'D': documento.Variables.Item(I).Value:= DM.ADODataSet4Direccion.AsString;
     'L': documento.Variables.Item(I).Value:= DM.ADODataSet4Localidad.AsString;
     'P': documento.Variables.Item(I).Value:= DM.ADODataSet4Provincia.AsString;
     'T': documento.Variables.Item(I).Value:= DM.ADODataSet4Telefono.AsString+' '+
                                       DM.ADODataSet4Movil.AsString;
    end; // Case
   end; // For
 end

Y otros códigos fuentes que he utilizado, pero no funcionan.

He mirado en el foro, pero no localizo un hilo que me resuelva el problema

Alguien sabe como acceder a los campos de una plantilla de Word desde delphi 7

Un saludo y muchas gracias.