Word

[leandrolinauer]

Bom dia a todos.
Já tenho um arquivo RTF modificável pelo sistema, mas agora necessito incluir neste RTF uma tabela com n parcelas, como fazer isto?
Atualmente faço assim:
leio o arquivo = c_Contrato := MemoRead( wD_Doc+oFileNovo )
modifico as variáveis = c_Contrato := STRTRAN( c_Contrato, "@RAZAOSOCIAL",wE_RAZAO )
gravo o arquivo = MemoWrit( wD_Doc+oFileNovo , c_Contrato )
abro o arquivo = HB_Openprocess("Explorer.exe " + wD_Doc+oFileNovo )

Agora necessito de incluir uma tabela e modifica-la de acordo com a quantidade de parcelas:
PARCELA VALOR DA PARCELA VENCIMENTO
@PC01 @VALOR01 @VENC01
....
@PC10 @VALOR10 @VENC10

Se fosse fixa as parcela, é fácil, o problema é que não são, podem ser 4, 5, .... 10, 24, 36, 48 e que eu preciso é acrescentar as linhas na quantidade exata de parcelas que estarei gerando, ou seja:

-posicionar na tabela
-incluir uma linha com variaveis
-substituir o conteudo das variaveis.

Se alguem souber como fazer isto e poder me dar uma luz, agradeço muito.
)

[alxsts]

Olá!

O tópico gerar arquivos em word usando harbour, postado pelo Itamar Lins, mostra um exemplo que provavelmente te ajudaria.

O único problema, é que não temos o conteúdo do arquivo "winpar.ch", necessário para compilar o exemplo. Não achei na internet. Se alguém tiver e puder postar, será ótimo.

[leandrolinauer]

Eu já tinha visto este exemplo, mas achei ele muito complexo, mas se não tem geito, nenhuma outra forma vou dar uma lida boa nele e tentar simplificar para minha necessidade.
Como eu fiz, usando strtran para substituir as variaveis do arquivo em RTF, e deu bem certo para eu que precisava, achei que haveria algo nesta facilidade para não precisar invocar CreateObject( "Word.Application" ), meu primeiro teste com ele deu muitos erro em variaveis não existentes, outra possibilidade seria gerar em PDF tudo.
Bom, vou estudar as possibilidades.
Grato pela ajuda
:)Pos