Plantillas word desde Delphi 7

[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.