Arsip: Masukkin data time dgn mask edit???

more 17 years ago
camp_sire
Gmn caranya masukkin data jam kunjung kdlm dbase dgn mggunakan mask edit? D dbase jam_kunjung mggunakn format datetime (short time). Pas ak coba slalu ada pesan error '...is not a valid integer value'. Gmn Neh??? Thnx..

more 17 years ago
betamax
ini kebalikan thread sebelah deh :) yah mas. pakenya mungkin maskedit di ganti aja pake datetimepicker itu saranku lebih efisien.
nanti ngambil datanya juga enak kok. mo pake datetimepicker.date / datetimepicker.time bebas kok :)

more 17 years ago
camp_sire
Loh klo pke datetime picker ntar yg tampil time now. Pdhl ada data yg g hrs time now. Gmn tuh??

more 17 years ago
jimbot
Loh klo pke datetime picker ntar yg tampil time now. Pdhl ada data yg g hrs time now. Gmn tuh??maksud anda gmana..??? :shock:

more 17 years ago
jayadi888
boss kalau jam kunjungan (realtime tuh) mendingan pake time system database aja (nggak usah di-manual-in biar lebih mudah, misalkan buat field jam kunjungannya TIMESTAMP (kalau pake mySQL) urusan untuk manipulasi jam nya itu belakangan :D
atau buat aja pake mask edit terus ambil jam sistem client
mask edit + timer
contoh dibawah salahsatu field dari format mysql untuk datetime
mask editnya (e1 format yyyy-mm-dd hh:mm:ss ) -> 9999-99-99 99:99:99;1;_
//ambil datetime system local/client dan masukin ke mask edit
procedure TFRocs.Timer1Timer(Sender: TObject);
begin
e1.Text := formatdatetime('yyyy-mm-dd hh:mm:ss',now);
end;
//----------------------------------------------------------------------------
//kalau mau timenya aja ya fieldnya diubah ke time
//mask editnya -> 99:99:99;1;_
procedure TFRocs.Timer1Timer(Sender: TObject);
begin
e1.Text := formatdatetime('hh:mm:ss',now);
end;
//jangan lupa kalau insert ketable untuk filed datetime/date/time selalu pake tanda quote

more 17 years ago
jayadi888
@jayadi888: boss kalau jam kunjungan (realtime tuh) mendingan pake time system database aja (nggak usah di-manual-in biar lebih mudah, misalkan buat field jam kunjungannya TIMESTAMP (kalau pake mySQL) urusan untuk manipulasi jam nya itu belakangan :D atau buat aja pake mask edit terus ambil jam sistem client mask edit + timer contoh dibawah salahsatu field dari format mysql untuk datetime mask editnya (e1 format yyyy-mm-dd hh:mm:ss ) -> 9999-99-99 99:99:99;1;_ //ambil datetime system local/client dan masukin ke mask edit procedure TFRocs.Timer1Timer(Sender: TObject); begin e1.Text := formatdatetime('yyyy-mm-dd hh:mm:ss',now); end; //---------------------------------------------------------------------------- //kalau mau timenya aja ya fieldnya diubah ke time //mask editnya -> 99:99:99;1;_ procedure TFRocs.Timer1Timer(Sender: TObject); begin e1.Text := formatdatetime('hh:mm:ss',now); end; //jangan lupa kalau insert ketable untuk filed datetime/date/time selalu pake tanda quote

more 17 years ago
betamax
datetimepicker itu punya property time dan property date.
field waktu kunjungan di tabel gimana ? tanggal dan waktu di jadikan satu (datetime) ato di pisah tgl dan waktu dalam field sendiri sendiri ?
kalo yang anda butuhkan tanggal kunjung pakainya datetimepicker1.date
kalo yang anda butuhkan jam kunjung pakainya datetimepicker1.time
kalo dua duanya dalam satu field di jumlahin aja langsung sebagai string;
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
edit2.Text := TimeToStr(Datetimepicker1.DateTime) + DateToStr(DateTimePicker1.DateTime);
end;
tinggal format datetime pada DBMS anda bagaimana ?
yyyy-mm-dd hh:mm:ss atau
formatdatetime('yyyy-mm-dd hh:mm:ss',now) seperti saran bung jayadi udah cukup jelas kok..
eror yang muncul kemungkinan hanya masalah pengaturan format input di mask edit anda.
jam duluan apa tanggal duluan yang harus di masukan, karena jika di database anda formatnya
jam duluan, sementara di mask edit anda menginputkan tanggal duluan niscaya akan muncul petir
pagebluk is not a valid integer value
semoga membantu.more ...
- Pages:
- 1
reply |
Report Obsolete
AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now:
https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago
Random Topic
- Menghilangkan efek kedip pada tabsheet?
by johnizzy in Tip n Trik Pemrograman more 16 years ago - stop gammu.exe dgn delphi
by pai_chan in Network, Files, I/O & System more 17 years ago - mohon bantuannya untuk nomor otomatis di delphi
by yufan in Bedah Kasus more 13 years ago - nge-set date
by nurez in Hal umum tentang Pascal Indonesia more 17 years ago - drag and drop
by andry_yang in Hal umum tentang Pascal Indonesia more 15 years ago - OLAP (Online Analytical Processing) or DataMining
by grounders in Hal umum tentang Pascal Indonesia more 19 years ago - Operator boolean kok selalu salah
by w11 in Tip n Trik Pemrograman more 14 years ago - mendapatkan kode rantai dari citra biner
by picastana in Enginering more 16 years ago - buat spy didelphi mohon bantuannya
by yufan in Hal umum tentang Pascal Indonesia more 13 years ago - form binggung
by delphi_tikuzz in Multimedia & Graphic Enhancement more 18 years ago