Cristina, de forma rápida, você poderia utilizar este componente para efetuar essa verificação +/- da seguinte forma:
1 - O programa inicia e captura a data atual do Windows e a salva em uma variável, label ou qq outro lugar; 2 - A cada segundo ele verifica se a data atual do Windows é a mesma data do sistema; 2.1 - Se for, continua; 2.2 - Se não for, efetua ação; Montei um esquema dessa forma e funciona perfeitamente, e coloquei uma coisinha extra: quando a data é alterada gravo em um log qual o usuário alterou a data, além de exibir uma mensagem meio de mal humor para ele. Você poderia implementar dessa forma até encontrar seu componente. QQ coisa mail-me ----- Original Message ----- From: Cristina To: delphi-br@yahoogrupos.com.br Sent: Thursday, September 29, 2005 8:45 AM Subject: Re: [delphi-br] Mensagem Windows - mudança de data Wilson, quero saber quando o Windows muda a data, não o usuário. Esta solução serve para verificar se a data alterou, mas gostaria de ter uma forma automática, onde quando há a mudança de dia o Windows me avise, envie alguma mensagem. Wilson Valdevite escreveu: > Cristina, se você estiver pretendendo saber se um determinado usuário > alterou a data de um determinado micro, você pode utilizar o > componente Timer na paleta System e configurá-lo para que, a cada > segundo ou a cada determinado tempo, ele faça a verificação da data do > sistema. > Se a data ou a hora for alterada ele efetua a ação que você queira > efetuar. > ----- Original Message ----- > From: Cristina > To: delphi-br@yahoogrupos.com.br > Sent: Wednesday, September 28, 2005 3:10 PM > Subject: [delphi-br] Mensagem Windows - mudança de data > > > Olá pessoal, > > Preciso saber qual mensagem o windows envia para as aplicações > quando há mudança de data, por exemplo: o computador está ligado dia > 27/09/05 23:59, quando ele muda para 28/09/05 00:00, gostaria de > receber > uma mensagem desta mudança. > > Procurei na API do windows e achei WH_CHANGETIME, mas esta mensagem > somente é enviada quando o usuário muda a data/hora do relógio do > windows. > > > -- > > Atenciosamente > ---------------------------------------- > Cristina Orthmann da Silva > HACON Automação e Tecnologia Ltda > Rua Lauro Linhares 589 - Bairro Trindade > Florianópolis - SC - Brasil > CEP 88036-001 > Fone/Fax: 55 48 333-0699 > Site: http://www.hacon.com.br/ > Email: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]> > ---------------------------------------- > > > > -- > <<<<< 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!. > > > > > ------------------------------------------------------------------------------ > > > No virus found in this incoming message. > Checked by AVG Anti-Virus. > Version: 7.0.344 / Virus Database: 267.11.8/114 - Release Date: > 28/09/2005 > > > > [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* > > * 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] > <mailto:[EMAIL PROTECTED]> > > * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do > Serviço do Yahoo! <http://br.yahoo.com/info/utos.html>. > > -- Atenciosamente ---------------------------------------- Cristina Orthmann da Silva HACON Automação e Tecnologia Ltda Rua Lauro Linhares 589 - Bairro Trindade Florianópolis - SC - Brasil CEP 88036-001 Fone/Fax: 55 48 333-0699 Site: http://www.hacon.com.br/ Email: [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]> ---------------------------------------- -- <<<<< 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!. ------------------------------------------------------------------------------ No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.344 / Virus Database: 267.11.8/114 - Release Date: 28/09/2005 [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
