Poner los bordes en una tabla con TWordApplication

[Mizosok]

Hola AL, gracias por responderme,

Yo realmente lo que he hecho siempre es eso que me sugieres, es decir, ver el codigo de una macro y despues buscar un similar con Delphi.

Pero en este caso lo que no sé es a quien pertenecen un grupo de propiedades tales como Style, ApplyStyleHeadingRows, ApplyStyleLastRow, ...., en TWordApplication.....

Le muestro la macro para que me entienda mejor...

Esta macro muestra solo una tabla simple de 4x3.. y con los dichosos bordes que estoy buscando...

Sub Macro5()
'
' Macro5 Macro
'
'
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=4, NumColumns:= _
5, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "Tabla con cuadrícula" Then
.Style = "Tabla con cuadrícula"
End If
.ApplyStyleHeadingRows = True
.ApplyStyleLastRow = False
.ApplyStyleFirstColumn = True
.ApplyStyleLastColumn = False
.ApplyStyleRowBands = True
.ApplyStyleColumnBands = False
End With
End Sub

Dicen por ahi que hay un paquete que creo que se llama Word para Torpes o algo parecido pero no encuentro un sitio para descargarlo....aunque repito, hasta ahora he resuelto de la forma que usted me explica

Precisamente soy nuevo en este foro, y algo de lo que me impulsó hacerlo es esta duda que tengo, y decidí en buscar ayuda.....

Trabajo con Delphi 6

Muchas gracias nuevamente, muy amable,

Mizos