Ver Mensaje Individual
  #8  
Antiguo 10-04-2013
Mizosok Mizosok is offline
Registrado
NULL
 
Registrado: abr 2013
Posts: 4
Reputación: 0
Mizosok Va por buen camino
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?
Responder Con Cita