Como comparo a data do sistema ???

Delphi

30/05/2003

Bom dia,

Estou precisando guardar a data do sistema em uma variável para depois compará-la com outra data (saber se é maior ou menor).
Alguém pode me dizer como faço essas duas coisas ???


Giancarlo

Giancarlo

Curtidas 0

Respostas

Oberdan

Oberdan

30/05/2003

Você pode aramazenar a data do sistema em uma variavel do tipo texto
mesmo, e depois converte-la para data, na hora de fazer a comparação:

Var
DataAtual : String[10];
Begin
DataAtual := DateToStr(Date);

// Depois na hora de comparar

If (Varialvel > StrToDate(DataAtual)) then

End;

Espero ter ajudado.

[]
Oberdan


GOSTEI 0
Fabianosouza

Fabianosouza

30/05/2003

Gian veja se resolve..

DataCompara := Campo ou valor a ser comparado
DataSistema := Date;
If (DataSistema < DataComparar) Then
Showmessage(´Data do Sistema é menor´);
Else
Showmessage(´A data da comparação e maior´);
End;


GOSTEI 0
POSTAR