ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Word via delphi

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
studenski
Novato
Novato


Registrado: Quarta-Feira, 16 de Julho de 2008
Mensagens: 37

MensagemEnviada: Qua Ago 27, 2008 4:39 pm    Assunto: Word via delphi Responder com Citação

Olá pessoal,

eu estou querendo saber como eu faço pra abrir um arquivo do word no modo somente leitura.

normalmente eu utilizo o seguinte codigo pra abrir um arquivo word:

Word := CreateOleObject('Word.Application');
word.documents.open('\\Term07\meus documentos\'+ adotable1.fields[0].asstring+'.doc');
word.visible:=true;

ele puxa um arquivo ja existente e cadastrado em um banco de dados....

fico no aguardo por uma solução...vlw
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
studenski
Novato
Novato


Registrado: Quarta-Feira, 16 de Julho de 2008
Mensagens: 37

MensagemEnviada: Qui Ago 28, 2008 10:45 am    Assunto: Responder com Citação

Oi pessoal, resolvi parte do problema usando a ferramenta, wordapplication...

porém como felicidade de pobre dura pouco surgiu outro problema, eu não consigo abrir mais de um documento ao mesmo tempo e nem em tempos separados, ou seja, eu abro um documento fecho e quando vou abrir outro da o seguinte erro " o servidor RPC não está disponivel", alguém poderia me dar uma luz na resolução desse problema???
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
studenski
Novato
Novato


Registrado: Quarta-Feira, 16 de Julho de 2008
Mensagens: 37

MensagemEnviada: Qui Ago 28, 2008 11:11 am    Assunto: Responder com Citação

E ai pessoal....bom coisa de principiante mesmo....mais pensando um pouquinho eu consegui resolver o problema, ficou assim o cod, e semprecisar o usar o wordapplication. Agora da pra abrir quantos eu quero e ao mesmo tempo....


arquivo:='\\Term07\meus documentos\'+ adotable1.fields[0].asstring+'.doc';
ReadOnly := True;
word:= createoleobject('Word.application');
Word.Documents.Open(arquivo, EmptyParam, ReadOnly, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,EmptyParam, EmptyParam);
Word.Visible := True;

Abraços a todos....
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB