--- Florentino - Yahoo escreveu:
> Olá,
>
> Uso o seguinte código para executar o Word e abrir um documento:
>
> WinWord := CreateOleObject('Word.Application');
> Docs:= WinWord.Documents;
> WinWord.Visible := true;
> Doc := Docs.Open(NomeArquivo);
>
> O problema é que, a cada execução é aberta uma nova instância do Word.
> Como é que eu faço para testar se o Word já está sendo executado e em
> caso afirmativo, abrir somente o arquivo sem executar o Word novamente?
>
> Obrigado.
[---x---]
[Welson] Você pode tirar o Visible = True, ou seja, deixar falso. E se lembrar
de dar um Diconnect ao final da rotina e um Free no objeto.
Você ainda continuará abrindo uma instância do Word, mas de maneira que o
cliente não perceba, sacou!?
[]s.
=================================
"O que me preocupa não é o grito dos maus. É o silêncio dos bons."
Martin Luther King.
=================================
Welson de Avelar Soares Filho
Analista/Programador Delphi
Gemini Sistemas
<www.geminisistemas.com.br>
Juiz de Fora - Minas Gerais
=================================
_______________________________________________________
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
Registre seu aparelho agora!
http://br.mobile.yahoo.com/mailalertas/
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
