Existe DateToInt?
16/10/2004
0
Existe alguma função que converte Data (TDateTime) para Numero (Integer ou Real)?
Valeu.
Sonec2004
Post mais votado
16/10/2004
Colegas,
É verdade, o tipo data são do tipo real onde a parte inteira armazena a data e a parte fracionária armazena o horário, portanto basta:
var DataInteira: Integer; begin DataInteira := Trunc(Date); end;
Aroldo Zanela
Mais Posts
16/10/2004
Christian_adriano
Para transformar para um número inteiro vc pode tentar o seguinte :
varInteger := StrToInt(FormarDateTime(ddmmyyyy),ValorData));
Onde:
varInteger : é uma variavel qualquer do tipo inteira.
ValorData : é uma como o proprio nome já diz, uma Data.
flw..
Espero ter ajudado.
[]´s.
Christian.
16/10/2004
Fórum Vini
se você quiser os dados formatados como ddmmaaaa numa variável inteira, pode usar a dica do christian_adriano... Mas se a idéia for somente converter para guardar em algum arquivo ou algo parecido, o tipo TDate não passa de um Double e informa na verdade o número de dias passados de uma certa data..(se não me engano é 30/12/1889)...
Então basta converter o Double para Integer usando a função Int():
dataInteger:= Int(dataNormal);
Espero ter ajudado,
Vinicius;
16/10/2004
Kenshindigital
var
i:integer;
data:tdate;
begin
data:=now;
i:=trunc(data);
end;
17/10/2004
Sonec2004
É bem simples, mas tenho muito que aprender ainda.
t+
Clique aqui para fazer login e interagir na Comunidade :)