Her Ayın Aynı Gününe Konumlanma

[akuyumcu63]

merhaba;

bankalardan çekilen kredilerin aylık ödeme günleri vardır. mesala her ayın 20 sinde ödeme yapılacak varsayalım.
kredi ödeme günlerini hazırlamış oluduğum programa eklerken tarih kaydının otomatik olarak her ayın aynı gününü yazmasını istiyorum.

mesala;
01.20.2010 (birinci ödeme tarihi bu diyelim.)
02.20.2010 (ikinci ödeme tarihi otomatik olarak bu tarihi almasını istiyorum. ekle dediğimde)
03.20.2010
04.20.2010

yukarıdaki şekilde tarihin artmasını nasıl sağlayabilirim. dateedit e her ayın aynı gününü yazdırmak istiyorum.

kolay gelsin,

[SimaWB]

function IncMonth(const DateTime: TDateTime; NumberOfMonths: Integer): TDateTime;

[akuyumcu63]

teşekkür ederim INCMONTH fonksiyonu işimi gördü.

kolay gelsin,