Fórum enviar dados para um documento pronto no word padrao.doc #156664

Estou com um problema grave.

o sistema que desenvolvi deve pegar um documento do word
pronto (padrao.doc) e salva-lo com outro nome e ir inserindo
informacoes, ate aí tudo bem.O problema é que esse documento
tem tabela, aí não sei como acessa-la:
1o. como faço para acessar a tabela que ja existe com uma
linha em branco
2o. ir atualizando cada coluna com os campos
que vem de um arquivo e passar para o proximo campo e
proxima linha,etc..

utilizo o delphi 3.0 client server
veja o trecho que funciona

procedure tfrmorc.gera_orc;
var
MSWord: Variant;
m_arq : string;
begin
if fileexists(frmmenu.path+frmmenu.dir+´\orcto\´+edit1.Text) then exit;
if not fileexists(frmmenu.path+frmmenu.dir+´\orcto\padrao.doc´) then
begin
mensagem(´O Sistema não pode gerar o orcamento no WORD.Arquivo padrao.doc não existe !´,3);
exit;
end;
copyfile(pchar(frmmenu.path+frmmenu.dir+´\orcto\padrao.doc´),pchar(frmmenu.path+frmmenu.dir+´\orcto\´+edit1.Text+´.doc´),false);
MSWord:= CreateOleObject(´Word.Basic´);
// if not (FindWindow(´OpusApp´, nil) > 0) then Word.AppShow;
MSWord.AppShow;
m_arq := frmmenu.path+frmmenu.dir+´\orcto\´+edit1.Text;
MSWord.fileopen(m_arq);
MSWord.insert(datext);
MSWord.insert(#13);
MSWord.insert(13);
MSWord.insert(´AO´+13);
MSWord.insert(edit7.text+13);
MSWord.insert(´Setor:´+13);
MSWord.insert(´At: ´+13);
MSWord.insert(´Ref. Orçamento de Material´+13);
MSWord.insert(13);
MSWord.insert(´Material: ´+13);
MSWord.insert(13);
MSWord.insert(13);
MSWord.insert(´Conforme solicitação de V.Sa. estamos lhes informando preço de material cirúrgico:´+13);

// MSWord := UnAssigned;
end;


agradeço antecipadamente