Pertama-tama kita akan membuat Form Login, form ini yang akan muncul pertama-kali ketika program dijalankan dan meminta anda untuk memasuk-kan password. Jika password yang dimasukkan salah maka anda tidak bisa menuju form berikutnya, sebaliknya jika password yang anda masukkan benar maka anda akan dibawa menuju form berikutnya yang berisi catatan pribadi anda.
1. Untuk tahap yang pertama kita akan membuat tampilan Form Login, buat aplikasi baru dengan cara klik File | New | Application pada menu utama Delphi.
2. Kemudian muncul form baru yang masih kosong.
3. Ubah beberapa properti dari Form tersebut.
4. Tambahkan 1 buah komponen TLabel, 1 buah TEdit, dan 2 buah TButton kemudian atur posisinya seperti pada gambar berikut. Semua komponen tersebut ada pada Tab Standard.
5. Ubah beberapa properti dari Label1.
6. Ubah beberapa properti dari Edit1.
7. Ubah beberapa properti dari Button1.
8. Ubah beberapa properti dari Button2.
Pembuatan tampilan untuk Form Login telah selesai, sekarang kita menuju ke tahap selanjutnya yaitu menambahkan kode-kode program pada Form Login agar dapat berfungsi sebagaimana mestinya.
9. Double Click Events OnShow dari FrmLogin.
10. Kemudian ketikkan kode program berikut.
11. Double Click Events OnClick dari BtnKeluar.
12. Double Click Events OnClick dari BtnLogin.
Setelah semua kode program untuk Form Login selesai diketikkan kemu-dian simpan program dengan cara klik File | SaveProjectAs pada menu utama Delphi.
Kemudian muncul kotak dialog Save Unit As.
Kemudian muncul kotak dialog Save Project As.
Pada tahap berikutnya kita akan membuat Form Catatan yaitu form untuk menyimpan dan membaca catatan rahasia anda.
13. Buat Form baru dengan cara Klik | New | Form pada menu utama Delphi.
14. Kemudian muncul form baru yang masih kosong.
15. Ubah beberapa properti dari Form tersebut.
16. Tambahkan 1 buah komponen TPanel, 1 buah TMemo, dan 2 buah TButton kemudian atur posisinya seperti pada gambar berikut.
17. Ubah beberapa properti dari Panel1.
18. Ubah beberapa properti dari Memo1.
19. Ubah beberapa properti dari Button1.
20. Ubah beberapa properti dari Button2.
Setelah tampilan untuk Form Catatan telah selesai, sekarang kita menuju ke tahap selanjutnya yaitu menambahkan kode-kode program pada Form Catatan.
21. Double Click Events OnClick dari BtnKeluar.
22. Kemudian ketikkan kode program berikut.
23. Buat 2 buah Fungsi dengan nama Enkripsi dan Dekripsi.
Fungsi Enkripsi berguna untuk mengacak isi dari catatan-catatan anda, sedangkan Fungsi Dekripsi sebaliknya yaitu untuk mengembalikan isi catatan yang diacak sehingga dapat dibaca.
24. Double Click Events OnShow dari FrmCatatan.
25. Kemudian ketikkan kode program berikut.
26. Double Click Events OnClick dari BtnSave.
27. Setelah semua kode program untuk Form Catatan selesai diketikkan kemudian simpan program dengan cara klik File | Save pada menu utama Delphi.
Kemudian muncul kotak dialog Save Unit As.
28. Sebelum menjalankan program, buka windows explorer menuju folder tempan anda menyimpan project ini, dan buat sebuah file dengan nama ‘catatan.txt’.
File ini digunakan untuk menyimpan semua catatan rahasia anda.
29. Jalankan program dengan menekan F9 atau klik Run | Run pada menu utama delphi.
Untuk pertama-kalinya ketika program dijalankan maka akan muncul kotak dialog seperti dibawah ini, maka yang anda harus lakukan adalah meng-klik tombol ‘Yes’.
Berikut adalah cara kerja program ‘Catatan Rahasia’.
Jika password yang anda masukkan benar maka akan muncul Form Catatan
Coba anda ketikkan suatu kata pada Form Catatan kemudian klik tombol ‘Save’ dan lihat hasilnya pada file ‘catatan.txt’.
0 komentar:
Posting Komentar