Tornar janela do word ativa. Como ?

Question

fala galera ...depois de dar o comando:wordapp.visible:=true;como fazer pra que a janela fique ativa (na frente da aplica�ao delphi), por que sempre aparece por tras (minimizado )....como traze-la pra...

Tchoninho · Answer

Experimente mandar a sua aplica��o minimizar, desta forma:wordapp.visible:=true; Application.Minimize;N�o testei mas acho que funciona.....

Werlon Goulart · Answer

Este codigo testa se a Classe TfmMenu existe e se existir, torna o form ativo colocando-a em primeiro nivel na tela (na frente das outras telas).

if (Findwindow(�TfmMenu�,nil)<>0) then begin // Existe o form, mostra-o.
SetForegroundWindow(Findwindow(�TfmMenu�,nil)); //Seta o form como primeiro nivel.
ShowWindow(Findwindow(�TfmMenu�,nil),SW_SHOW); //Mostra o form.

Basta usar o Winsight32 (ws32.exe no diretorio do Bin do Delphi) pra ver qual a classe do Word.
Chame o Winsight32 e DEPOIS chame o Word pra ver na linha q foi criada o nome da classe.

Um abra�o
Werlon Goulart

Echoesofpinkfloyd · Answer

[quote:a22ccfd862=�Werlon Goulart�]Este codigo testa se a Classe TfmMenu existe e se existir, torna o form ativo colocando-a em primeiro nivel na tela (na frente das outras telas).

if (Findwindow(�TfmMenu�,nil)<>0) then begin // Existe o form, mostra-o.
SetForegroundWindow(Findwindow(�TfmMenu�,nil)); //Seta o form como primeiro nivel.
ShowWindow(Findwindow(�TfmMenu�,nil),SW_SHOW); //Mostra o form.

Basta usar o Winsight32 (ws32.exe no diretorio do Bin do Delphi) pra ver qual a classe do Word.
Chame o Winsight32 e DEPOIS chame o Word pra ver na linha q foi criada o nome da classe.

Um abra�o
Werlon Goulart[/quote:a22ccfd862]

valeu mesmo .. vou tentar e qualquer coisa posto aqui .. abra�os.

F�rum Tornar janela do word ativa. Como ? #184625