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] 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
Re: [delphi-br] Mensagem Windows - mudança de data
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
Re: [delphi-br] Mensagem Windows - mudança de data
Cristina
Me desculpe me meter, mas se você só quer saber se a data mudou, experimente o
seguinte:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
If TimeToStr(Now) = '00:00:00' then
ShowMessage('Mudou a data!');
end;
Este procedimento só funcionará no caso da coincidência de hora, ou seja, se o
aplicativo estiver ativo às 00:00.
Espero que ajude.
Hélio Ricardo B. Santos
- Original Message -
From: Wilson Valdevite
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, September 29, 2005 9:10 AM
Subject: Re: [delphi-br] Mensagem Windows - mudança de data
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
Re: [delphi-br] Mensagem Windows - mudança de data
type
TForm1 = class(TForm)
private
procedure WMTimeChange(var Msg: TMessage) ; message WM_TIMECHANGE;
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.WMTimeChange(var Msg: TMessage) ;
begin
inherited;
ShowMessage('Date/Time has changed!') ;
end;
- 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!.
[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
RES: [delphi-br] Mensagem Windows - mudança de data
Tem alguma maneira de pegar a data e hora da net?, tipo web service ou algum outro [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
[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] 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
Re: [delphi-br] Mensagem Windows - mudança de data
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] 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
