Sobre Datas

Delphi

14/03/2005

qdo tento o seguinte código:
Procedure Imprimir;
var Data: TDate;
begin
  Data := (10/08/1984);
  Caption := DateToStr(Data);
end;
Parece que me retorna sempre a data zero do delphi (ou seja o começo do ponto flutuante que representa as datas), como eu faço para aparecer ´10/08/1984´?


Bruno Belchior

Bruno Belchior

Curtidas 0

Respostas

Massuda

Massuda

14/03/2005

Esta linha...
Data := (10/08/1984);
não está atribuindo a data 10/08/1984 à variável Data, mas sim o resultado da conta 10 / 8 / 1984... que é um valor muito pequeno, próximo de zero. Porisso você está obtendo a data zero.

Para atribuir uma data à variável, use a função [url=http://www.delphibasics.co.uk/RTL.asp?Name=EncodeDate]EncodeDate[/url] da unit SysUtils.


GOSTEI 0
Bruno Belchior

Bruno Belchior

14/03/2005

obrigado Massuda é algo tão lógico que chega ser idiota uma pergunta dessa... mas tá no local certo...


GOSTEI 0
POSTAR