İki tarih arasındaki fark

[GOLAKS]

merhaba arkadaşlar;

iki tarih arasındaki farkı hesaplamaya çalşıyorum ancak şöyle bir sorunum var ;

Kod: Tümünü seç

tblCeklerKG.Value   := IntToStr(DaysBetween(Now,tblCeklerVADE.Value));

şeklinde bir kodla hesaplanmış alan olarak tarihler arası gün farkını bulabiliyorum ancak tarih farkını hesaplarken fark eğer - değere denk geliyorsa hesaplanmış alanada - olarak yazmalı DaysBetween komutunda bunu başaramıyorum.

örneğin:
Vade Tarihi Günün Tarihi Geçen gün
01.10.2007 - 05.10.2007 = -4 olması gerekirken 4 oluyor


yani ben geçen günleri - olarak görüntülemek istiyorum. Teşekkürler.

[macicek]

merhaba arkadaşlar;

Kod: Tümünü seç

tblCeklerKG.Value   := IntToStr(DaysBetween(Now,tblCeklerVADE.Value));

Delphide henuz yeniyim o yuzden isini gorebilecek bir class veya metod varmi bilemiyorum.ancak aklima hemen ilk etapta gelen bunu basit bir if yardimiyla yapabilirsin.Eger tblCeklerVADE.Value suanki tarihten buyukse

Kod: Tümünü seç

 
tblCeklerKG.Value   := IntToStr((-1*DaysBetween(tblCeklerVADE.Value,Now))) 

seklinde olabilir diye dusunuyorum.
iyi calismalar

[mussimsek]

Tarih integer, tarih ve saat (datetime) float bir değer, yani sayısal olarak depolandığı için sayısal işlemleri kolaylıkla yapabilirsiniz.

Mesela bir gün sonrasının tarihini "Date + 1" ifadesiyle bulabilirsiniz.

Dolayısıyla :

Now - tblCeklerVADE.AsDateTime;

ifadesi istediğiniz değeri verecektir.

Kolay gelsin.