He intentado de varias formas crear una tabla dentro de un documento de Microsoft Word y no he podido.
Alguien ha podido realizar esta tarea? Como?
Tengo:
var
libro: OLEVariant;
WS: WideString;
begin
try
libro := CreateOleObject('Word.Application');
except
on e:exception do begin
Application.MessageBox('Error al crear el documento. Primeramente debe instalar el Office.', pchar(Self.Caption), MB_ICONINFORMATION);
exit;
end;
end;
libro.WordBasic.FileNew;
WS := UTF8Decode('ACTA DE CONCILIACIÓN DE PAGO');
libro.Selection.TypeText(WS);
libro.Selection.TypeParagraph;
libro.ActiveDocument.Tables.Add(Range:=libro.Selection.Range, NumRows:=4, NumColumns:=4, DefaultTableBehavior:=1, AutoFitBehavior:=0);
Me retorna un error en el metodo .Add