Fórum Sobre Datas #272314

14/03/2005

0

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

Responder

Posts

14/03/2005

Massuda

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.


Responder

Gostei + 0

14/03/2005

Bruno Belchior

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


Responder

Gostei + 0

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

Aceitar