Gunakan function2 yang terdapat pada unit DateUtils.

function EndOfTheMonth(const AValue: TDateTime): TDateTime;
function EndOfAMonth(const AYear, AMonth: Word): TDateTime;

-----Original Message-----
From: William IT [mailto:[EMAIL PROTECTED] 
Sent: Thursday, October 30, 2003 7:46 AM
To: [EMAIL PROTECTED]
Subject: Re: [Delphindo] menambah menit / detik / jam di SQL server

>   nah itu dijawab sendiri... :)
>   berarti kan kalau mau tambah jam tinggal ditambah 1/24
>   menit: 1/24/60 atau 1/1440
>   detik: 1/24/60/60 atau 1/86400
>   milidetik: 1/24/60/60/1000 atau 1/8640000
aa (aa gym?), bagaimana caranya untuk menambah 1 bulan?
kasusnya user saya sering membuat report dari tanggal awal sampai
tanggal
akhir sebuah bulan, misalnya:
tgl 15/01/2003 sampai 31/01/2003
saya ingin agar jika ia entry 15/01/2003 maka otomatis tgl akhirnya
adalah
1/2/2003-1 = 31/01/2003 sehingga ia tidak perlu ketik lagi.
Apakah ada cara yg lebih praktis?
Note: entry tanggal dilakukan di TEdit (atau boleh juga TDateTimePicker)





------------------------ Yahoo! Groups Sponsor ---------------------~-->
Rent DVDs Online - Over 14,500 titles.
No Late Fees & Free Shipping.
Try Netflix for FREE!
http://us.click.yahoo.com/vhSowB/XP.FAA/3jkFAA/i7folB/TM
---------------------------------------------------------------------~->

Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED] 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/ 


Kirim email ke