GARANTIR DESCONTO

Fórum alterar data e hora via programação? #267642

07/02/2005

0

Amigos, como faço para alterar data e hora do sistema via programação

quando meu aplicativo for iniciado gostaria de exibir a data e a hora do
sistema para que seja confirmada pelo usuario, se estiver errada gostaria
que ele apenas digitasse a data e a hora certa, e confirmasse.
tem como?

desde ja agradeço...




delphi 7.0 e firebird 1.5


Marcusbraga

Marcusbraga

Responder

Posts

07/02/2005

Aroldo Zanela

Colega,

Fiz um pequeno exemplo com a data. Para inserir as demais informações, basta seguir o exemplo e o code-insight.

var SystemTime: TSystemTime;
  Ano, Mes, Dia: Word;
begin
  DecodeDate(DateTimePicker1.Date, Ano, Mes, Dia);
  GetSystemTime(SystemTime);
  SystemTime.wYear := Ano;
  SystemTime.wMonth := Mes;
  SystemTime.wDay := Dia;
  SetLocalTime(SystemTime);
end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar