NAO PERMITIR COPIAR TEXTO

EMANUEL 27/12/2004 18:51:11
#57207
Caros, boa tarde!
Como fazer com que meu documento no word fique internamente no executavel e quando visaulizado pelo usuário nao permita selecionar e copiar?

obrigado,
sds
Emanuel
USUARIO.EXCLUIDOS 28/12/2004 00:23:44
#57298
Resposta escolhida
Você está utilizando vinculação OLE para os objetos do Word. Quem determina a forma de trabalho é sempre o próprio Word, baseado nas propriedades do documento.
Essas propriedades, algumas, você pode modelar por código com a automação.
Uma das possibilidades é manter o arquivo de documento como ReadOnly na abertura do mesmo, ex.:
...
Dim oP As Word.Document
Dim aP As Word.Application
Set aP = New Word.Application
Set oP = ap.Documents.Open("Arquivo", , True)
...
Mas isto não impedirá a cópia do documento, menos ainda a seleção de trechos do mesmo.

Isto se dá porque o Word é um editor de textos, ou seja, sua função é mesmo a de permitir essas ações.
Para que você possa mostrar textos sem permitir sua edição ou cópia, você pode utilizar-se do controle RichTextBox, que "entende" arquivos com a formatação RTF, que também pode ser utilizada pelo MS-Word. Desta forma, gravando os arquivos de documento em formato RTF, você não precisa da OLE para gerenciar o aplicativo Word por dentro do VB e pode travar edição e cópia, até mesmo desabilitar a caixa de texto.
Tópico encerrado , respostas não são mais permitidas