Arsip: penambahan waktu ?

more 14 years ago
jajang
gini
ada edit1.text dan edit2.text
ketika saya isikan di edit1.text "01/19/2008" ketika di tab
edit2.text hasilnya secara otomatis ngisi dengan "01/19/2009" jadi bertambah 1 tahun gtu ?
gmana yach ?

more 14 years ago
mas_kofa
ShortDateFormat := 'MM/dd/yyyy';
dt := StrTodateDef(Edi1.Text, 0);
Edit2.Text := DateToStr(EncodeDate(YearOf(dt)+1, MonthOf(dt), DayOf(dt));

more 14 years ago
mas_kofa
ShortDateFormat := 'MM/dd/yyyy';
ralat :
ShortDateFormat := 'dd/MM/yyyy';
more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 2 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 3 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 10 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 10 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 10 years ago
Random Topic
- tulung..tulung
by alvonz in MsSQL more 14 years ago - Tanya cara input dari dbgrid ke stringgrid atau yang lainnya
by aliexdsg in Tip n Trik Pemrograman more 12 years ago - Cara koneksi dari komputer ke client pake komponen zeos ???
by doditali in Network, Files, I/O & System more 16 years ago - BDE
by drackids in OOT more 15 years ago - Salam kenal semua .....
by gandungtjakep in OOT more 14 years ago - klik cell di dbgrid
by dauf in Tip n Trik Pemrograman more 15 years ago - Soal TAdoTable... share dikit....
by juan81 in Hal umum tentang Pascal Indonesia more 15 years ago - DBExpress-Oracle TSQLStoredProcedure error ...bug ?
by mastoto in Lain-lain more 15 years ago - Install JEDI di Turbo Delphi Explorer
by bangfauzan in Tip n Trik Pemrograman more 16 years ago - buat kamus???
by drfa20 in Bedah Kasus more 15 years ago