Declaração

procedure WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND;


Procedure

procedure TfmBase.WMSysCommand(var Msg: TWMSysCommand);
begin
   if Msg.CmdType = SC_MINIMIZE then
   begin
      Application.Title := 'Minimizado';
      Application.Minimize;
   end
   else if Msg.CmdType = SC_RESTORE then
   begin
      Application.Title := 'Normal;
      Application.Restore;
   end;
   DefaultHandler(Msg);
end;


Não sei se já responderam, mas aí está um exemplo.



Celso Lorenzetti
[EMAIL PROTECTED]
Genesys Engenharia de Software Ltda.

  ----- Original Message ----- 
  From: Andre - Yahoo 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Monday, March 07, 2005 2:54 PM
  Subject: [delphi-br] Capturar evento de minimizar/maximizar formulário


  Gostaria de saber se alguem da lista saberia como capturar os eventos que 
ocorrem quando minimizo e quando maximizo um formulário. Preciso saber quando o 
formulário principal foi minimizado para poder disparar um TTimer e quando ele 
for maximizado preciso parar o TTimer. Alguem pode me ajudar ???


       André Luis da Silveira

        Desenvolvedor

        Latícinios Morrinhos Ind Com Ltda
       


  [As partes desta mensagem que não continham texto foram removidas]



  -- 
  <<<<< 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] ou [EMAIL PROTECTED]



        Yahoo! Grupos, um serviço oferecido por: 
             
             
                      
             
       


------------------------------------------------------------------------------
  Links do Yahoo! Grupos

    a.. Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/
      
    b.. Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]
      
    c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço 
do Yahoo!. 



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< 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] ou [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

 



Responder a