Geraldo
Eu copiei seu codigo e executei. O que obtive foi exatamente o que voce disse que seus clientes estao obtendo.
Corrigi acrescentando o caminho do objeto corretamente e resolveu em:
StrToFile(lcHTML,fullpath(sys(2003))+"\Teste.DOC) <- observe que so acrescentei a barra de diretorios e o caminho.
Veja no seu programa os caminhos dos arquivos. No caso que eu fiz, eu alterei de sys(2003) para um caminho fixo como d:\teste.doc tanto ao criar como ao recuperar o objeto.
Saulo Heber
Saulo Heber MM