F�rum ShowMessage - Janela de Aviso - 1o Plano #12728

08/12/2009

Como utilizando o componete showmessage ou aplication.messagebox a nova janela sempre esteje em primeiro, independente da utilizacao das tecla ALT+TAB (WIndows). O maior problema � que esta janela fica escondida atras do form que a chamou , causando a sensacao que o programa esta travado.

Edival Lira

Curtir t�pico

+ 0

Responder

Posts

14/12/2009

Wesley Yamazack

Ol� amigo bom dia !

Atrav�s da API do Windows podemos mandar 2 tipos de Mensagem : SendMessage e PostMessage

SendMessage : Envia a mensagem para Windows e aguarda que at� ela ser processada;PostMessage : Envia a mensagem para a fila de Windows.
Ent�o como isso funciona ?
Onde voc� queira mandar a mensagem, implemente o seguinte. Exmplo :

Clique do Bot�o !!!
procedure TForm1.Button1Click(Sender: TObject); begin SendMessage(Handle, WM_APP,0,0); ShowMessage('Teste de Msg'); end;Clique do Bot�o !!! procedure TForm1.Button2Click(Sender: TObject);begin Perform(WM_APP,0,0); ShowMessage('Teste de Msg');end;
Veja se issso ir� resolver teu problema.

Um abra�o

Wesley Y

Responder

Gostei + 0

18/12/2009

Wesley Yamazack

OL� amigo, podemos fechar o chamado, consegui fazer o exemplo ?

Abra�o

Wesley Y

Responder

Gostei + 0

22/12/2009

Edival Lira

Obrigado, estarei fazendo os testes Atenciosamente, Davi.

Responder

Gostei + 0

23/12/2009

Wesley Yamazack

OK amigo, estamos aguardando

Att,

Wesley Y

Responder

Gostei + 0

11/01/2010

Wesley Yamazack

Ol� amigo, consegui fazer o exemplo ? Estamos aguardando para fechar o chamado.

Att,
Wesley Y

Responder

Gostei + 0