Foros Club Delphi - Cambiar el formato de docvariable de una plantilla en word

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Lazarus, FreePascal, Kylix, etc. (https://www.clubdelphi.com/foros/forumdisplay.php?f=14)

- - Cambiar el formato de docvariable de una plantilla en word (https://www.clubdelphi.com/foros/showthread.php?t=89138)

Cambiar el formato de docvariable de una plantilla en word

Hola amigos del foro trabajo sobre una plantilla .dot donde les mando los datos. Ahi todo va perfecto mi duda es. ¿como se le puede cambiar el formato por ejemplo el tipo de fuente o el tamaño de una docvariable en una plantilla?. Ya que he estado buscando pero no encuentro ningun ejemplo que me pueda ayudar. de antemano muchas gracias.

Ya encontré la solución. en vez de usar docvariable utilice marcadores los cuales cuenta con las propiedad font.bold para poner en negrita en caso de que se requiera.

Aqui les dejo un pequeña parte del codigo. Con esto creo que les servira.

Código:



var

  Word,marcador,doc1,documento: Variant; 

begin

  (* Creas un objeto Word *)

  try

    {* a la variable "w" le asigno la ruta donde se encuentra la plantilla a utilizar *}

    w:= UTF8Decode(ExtractFilePath(application.ExeName)+'plantillas\previnirsolicituditai.dotx');

    Word := CreateOleObject('Word.Application');

    (* Añades un documento basado en la plantilla *)

   Documento := Word.Documents.Add(w);

   Documento := Word.Documents.Item(1);

   doc1:= Word.ActiveDocument;

    if Doc1.Bookmarks.Exists('autoridad') then   {Chequea si existen las marcas en el documento}

    Begin

                marcador := Doc1.Bookmarks.Item('autoridad').Range;   { añade texto a la marca de nuestro documento}

                marcador.Font.Bold     := True; {cambio a negrita}

  

   end;