Poner Bordes en una tabla con TWordApplication
No, no es que genere error, el problema es que dentro de TWordApplication, no existen..., es decir cuando la trato de buscar (en delphi) no la encuentro...
De todas forma Al, volvi a editar la macro de Visual Basic en Word y solo deje esta instrucción...
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=4, NumColumns:= _ 5, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _ wdAutoFitFixed
O sea, le quité las otras propiedades que vienen con el With,
y cuando ejecuto la nueva macro editada me genera la tabla con bordes,
como yo la quiero.....
Y cuando pongo la misma instrucción en delphi de la forma siguiente:
ap.ActiveDocument.Tables.Add( ap.Selection.Range, 3, 4,
DefaultTableBehavior, AutoFitBehavior );
ap es del tipo TWordApplication y
declaro:
DefaultTableBehavior y
AutoFitBehavior como Olevariant // Estas variables son de referencia
Delphi me muestra una tabla pero sin los bordes, entonces que pudiera ser?
|