Arsip: fungsi sleep() utk program demo/shareware
more 18 years ago
ryan
:roll: buat mas Luri : "gimana logika programnya bikin prog demo/shareware pake fungsi sleep().
more 18 years ago
ZeAL
Gue mo jawab, tapi nanyanya ke om Luri... gak jadi ahh.... Ntar aja nunggu om nya yang keluar duluan.. :D
more 18 years ago
ZeAL
errr.. maksudnya fungsi sleep itu apa yah? kayak splashscreen gitu trus nunggu beberapa detik baru masuk ke main form?
kalo iya...hmm.... bikin form baru.. misalnya namanya form2..
Masukin TTimer, set interval misalnya 3000 trus enabled := false;
di TTimer.OnTimer (kalo gak salah), masukin
Form1.show;
timer1.enabled := false;
Form2.hide // atau close juga bisa
Di form utama pas onCreate kasih kode tambahan...
formMain.hide;
form2.show;
form2.timer1.enabled := true;
Kira2 kayak gitu deh.. dikembangin lagi aja.. ini gue gak dites dulu, langsung asal ketik aja... okeh, beibeh... :D
more 18 years ago
masdi2t
Sleep:
Delay program execution for a specified number of microseconds
untuk program demo dibagian yang mana ya?
atau mungkin maksudnya TimeLimit? klu time limit bisa pake komponen TJvTimeLimit dari Jedi[/i]
more 18 years ago
ryan
yg aku maksud yaitu fungsi sleep yg ada di artikel yg dikirim ama om Luri judulnya "Menghentikan program selama periode waktu tertentu"
more 18 years ago
ZeAL
haiyah.. jauh banget... aturan istilahnya jangan sleep jadi gak salah paham..
kalo ini mau kayak "trial 30 hari" atau "dapat digunakan hingga tanggal bla..bla..bla"..???
kalo trial lebih rumit.. kita ngomongin yang "dapat digunakan sampe tanggal bla..bla" aja yah.. :D
cara gampang & cepet nya ya di Form.OnCreate tambahin cek data.. misalnya :
if date >= strtodate('1/1/2007') then
begin
showmessage('program sudah expired!');
close;
end;
ini cara simple dan gak mikir urusan keamanan.. dikembangin sendiri lah... okeh.. :D
more 18 years ago
LuriDarmawan
@ZeAL: err... ngomong2 artikel yang mana? linknya donk.. males mo nyari... :Pgawatt.... http://pascal-id.org/dpr/Article91.pas
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 3 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 3 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 4 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 11 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 11 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 11 years ago
Random Topic
- Web Development Using with MySQL & Delphi
by aamumung in Tip n Trik Pemrograman more 16 years ago - Help - Problem kirim sms dengan Comport
by batozai in Network, Files, I/O & System more 13 years ago - delphi nya aneh
by hendra23 in Tip n Trik Pemrograman more 15 years ago - Pake Flash Didelphi
by saysansay in Hal umum tentang Pascal Indonesia more 18 years ago - Bantuin Normalisasi plz...
by holmes in OOT more 17 years ago - [ask]gimana buat form supaya memiliki style windows XP
by R960XT in Form Enhancement & Graphical Controls more 17 years ago - Radio Group Find...
by saysansay in Enginering more 18 years ago - Gimana Cara Bgeblok Sebuah Situs????
by mankerman in Web Programming more 15 years ago - koneksi firebird gimana?
by Pelangi in FireBird more 16 years ago - Instant messenger untuk sistem informasi tersebar
by astika in Tip n Trik Pemrograman more 13 years ago