Fórum Diferenca entre Datas #229783

04/05/2004

0

Preciso fazer que me informe sobre diferenca entre datas a quantidade de semanas.


Exemplo: data Inicial 22/09/2003
data Final 15/03/2004

Quantidade de semanas entre data inicial e final e quantidade de dias.


sds
AGAraujo


Agaraujo

Agaraujo

Responder

Posts

04/05/2004

Lucas Silva

var data_Inicial,data_Final: TDate;
    valor: Integer;
    semanas: real;
....
data_Inicial := StrToDate(´22/09/2003´);
data_Final := StrToDate(´15/03/2004´); 

valor := data_final - data_inicial;

// tipo assim, cada semana tem 7 dias..

Semanas := valor/7; 



Até mais....

Lucas!


Responder

Gostei + 0

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

Aceitar