Fechar o showmessage

16/12/2005

4

Olá pessoal, estou com uma duvida, será que alguem pode me ajudar.
Quando eu gravo, acostumo dar uma mensagem.
Showmessage(´Gravado com sucesso´);
Como que eu faço para colocar um timer na mensagem e fechar sem o usuario clicar.

Muito obrigado pela atenção.


Responder

Posts

16/12/2005

Bruno Belchior

Nunca testei... porém acho que funcionaria, use um Application.MessageBox (pra controlar o Caption da Mensagem), então no OnTimer faça (especifique o tempo e ative):
var
  HndlMensagem: THandle;
begin
  HndlMensagem := FindWindow(nil, ´Caption da mensagem´);
  if HndlMensagem <> 0 then
    SendMessage(HndlMensagem, WM_QUIT, 0, 0);
end;



Responder

17/12/2005

Rgaffo

Por que vc não informa a mensagem em uma barra de status, fica bem melhor e depois de um tempo vc pode tirar a mensagem.

[]s

Robert


Responder

18/12/2005

Fx|hand

procure um componente free chamado TBallonHint... eu as vezes axo ele mto melhor q 1 messagebox... =)

com ele dah por exemplo vc avisar o usuario q está faltandu um campo pra preencher com um balão de hint... =)


Responder