Skip to main content

Membuat form login menggunakan delphi XE5 bagian kedua

delphiinsertimage3

Di bagian pertama kita sudah membuat form login seperti ini. Sekarang mari kita coba tambahkan komponen Tlabel, TEdit dan TButton ke dalam form1 agar benar-benar menjadi sebuah login form yang kita inginkan. Atur tata letaknya menjadi seperti ini.


delphi_login_form_full.png


Klik form1 dan ubah nilai properties KeyPreview menjadi True. Properties tersebut berguna agar form1 dapat menerima keystroke dari user. Apa maksud dari keystroke diatas ? Maksudnya adalah kita telah menambahkan button Close ke dalam form1 dan di caption button kita telah menuliskan "Esc - Close". Kita ingin ketika program tersebut dijalankan, nantinya user memiliki ability untuk menutup form1 tersebut dengan cara menekan tombol Esc di keyboard.


delphi_login_form_full2.png


Merubah character password untuk kotak isian password


Untuk merubah character password agar tidak bisa terbaca oleh orang lain sangatlah penting. Jika anda tidak memperdulikan hal ini, bisa jadi orang lain akan menganggap bahwa aplikasi yang anda buat tidak profesional. Lalu bagaimana cara merubahnya ? Caranya sangatlah sederhana. Klik komponen TEdit yang anda gunakan untuk kotak isian password diatas. Lalu ubahlah nilai properties PasswordChar dari komponen tersebut menjadi *. Jika anda ingin menggantinya dengan character lain boleh-boleh saja.


Merubah properties Name untuk setiap komponen atau object


Sebelum kita melangkah lebih jauh ke tahap pengkodean / coding, biasakanlah untuk memberikan nama pada properties Name dari masing-masing object yang anda gunakan. Mengapa demikian ? Karena hal ini akan sangat membantu anda nantinya dalam mengingat dan mengenali setiap object yang ada di dalam form, module, report, dll di aplikasi anda. Yuk langsung saja kita berikan nama yang unik ke setiap object.




Disini kita hanya akan berikan nama untuk object yang akan berhubungan langsung dengan coding kita nanti.


  • Name TForm1                  : Form1

  • Name TEdit user name : TxtUserName

  • Name TEdit password   : TxtPassword

  • Name TButton login      : BtnLogin

  • Name TButton                 : BtnCancel



Jika sudah selesai, kita akan coba melakukan coding yang sederhana. Namun sebelum itu, saya akan jelaskan sedikit mengenai Event. Di dalam bahasa pemrograman berorientasi object, setiap komponen tidak hanya memiliki atribut/properties. Namun juga memiliki event seperti Onclick, OnDblClick, OnMouseMove, OnCreate, dll. Event click dan double click biasanya digunakan pada komponen TButton.


Sekarang cobalah double click komponen TButton untuk BtnCancel. Jika sudah sisipkan coding "application.Terminate;" seperti gambar dibawah ini dan jalankan aplikasinya dengan cara menekan tombol F9. Jika form1 sudah tampil, cobalah untuk klik button close atau tekan tombol esc.


delphi_application_terminate.png


delphi_form_login_close_event.png


Wahh..form tersebut berhasil ditutup ketika anda menekan button close. Tapi tidak berhasil ketika anda menekan button esc. Sekarang, cobalah untuk menambahkan sedikit coding lagi.


delphi_form_login_form_close_event


Tips penting !


Anda tidak perlu mengetikkan semua coding yang ada diatas ya..karena sebenarnya yang mesti anda ketikkan hanyalah "if key = #27 then application.terminate;". Lalu bagian procedure eventnya bagaimana ? Caranya sangat mudah. Klik object form1. Di bagian Object Inspector di sebelah kiri layar IDE delphi xe anda terdapat 2 tab. Yaitu properties dan events.


Klik tab events, lalu pilih event FormKeyPress. Silahkan double click pada dropdown di sebelah area even tersebut. Hasilnya menjadi seperti ini.


delphi_form_login_form_close_event2.png


Nah...sisipkanlah coding tadi diantara tag begin dan end yang ada didalam procedure TForm1.FormKeyPress di atas. Hasil akhirnya coding anda akan menjadi seperti ini.


delphi_form_login_form_close_event_full_code.png


Jalankan kembali aplikasinya. Sekarang apabila anda klik button close atau tekan tombol esc aplikasinya sudah berhasil menutup bukan ?


Tips bagaimana cara berpindah ke area kode delphi dan area design delphi 




[caption id="attachment_445" align="alignnone" width="831"]area_code.png Klik tab Code untuk menampilkan area kode[/caption]

 

[caption id="attachment_447" align="aligncenter" width="480"]area_desain.png Klik tab Design untuk menampilkan area desain[/caption]

Happy coding :)


https://www.youtube.com/watch?v=dAn4uUo5IDI

https://www.youtube.com/watch?v=-pcu0lPkkL4

https://www.youtube.com/watch?v=Q6UVd7ZV_OA

https://www.youtube.com/watch?v=TLD5BJCKnSI

 

 

Comments

Popular posts from this blog

Mengirim Email dengan Delphi XE Menggunakan Account Google

Kemarin kita sudah membahas mengenai bagaimana caranya mengirim email melalui aplikasi yang dibuat dengan menggunakan VB.NET . Nah sekarang bagaimana caranya mengirim email tapi melalui aplikasi Delphi XE? Untuk mengirim email melalui Delphi XE sebenarnya mudah sekali. Caranya juga hampir mirip dengan VB.NET kok. Component yang dibutuhkan antara lain adalah TIdSMTP, TIdMessage dan TIdSSLIOHandlerSocketOpenSSL. Tanpa component-component tersebut kamu tidak akan dapat mengirimkan email. Selain component yang saya sebutkan diatas, tentu kamu akan membutuhkan koneksi internet. Tanpa itu mustahil email dapat dikirim ke alamat tujuan. Sebenarnya kamu juga dapat menambahkan class dari masing-masing component diatas ke dalam uses tanpa harus menggunakan component. Hal lain yang sangat penting yang mesti kamu pahami adalah untuk mengirimkan sebuah email dibutuhkan yang namanya email sender (email si pengirim), email recipient (email si penerima), email cc (optional), email bcc (optional) dan SM

Penjumlahan Inputbox Secara Otomatis Di HTML, Php, Dan JQuery

Hai sobat yadishare apa kabar? Sudah hari sabtu lagi nih. Iseng-iseng ah pengen nulis mengenai html dan jquery. Ketika kita membangun sebuah aplikasi menggunakan php, seringkali kita harus membuat sebuah penjumlahan antar textbox secara otomatis agar memudahkan user. Misalnya kita memiliki 3 buah inputbox yang kita buat dengan menggunakan HTML yang terdiri dari sub total, ppn, dan grand total. Kemudian setiap kali kita menginputkan angka ke dalam textbox sub total dan textbox ppn tersebut, kita ingin textbox grand total jumlahnya terhitung secara otomatis agar dapat memudahkan user. Lalu bagaimana caranya? Nah untuk dapat melakukannya, kita pasti butuh cara yang mudah dan cepat bukan? Ada banyak cara yang dapat kita lakukan untuk mewujudkan hal tersebut. Salah satunya adalah dengan menggunakan bantuan JQuery. Pertama kalian bisa download file jquery.js disini . Masukkan ke dalam folder assets/js. Kalian juga dapat menambahkan script berikut ini tanpa harus mendownload f

Aplikasi Database CRUD (VB6 + Ms. Access + Crystal Report 8)

Assalamualaikum wr. wb. sobat yadishare, apa kabar ? Di artikel kali ini saya akan membagikan tutorial tentang bagaimana cara membuat aplikasi CRUD (create, read, update, dan delete) menggunakan aplikasi atau bahasa pemrograman visual basic 6.0 dan database yang akan saya gunakan adalah database microsoft access. Untuk pembuatan laporannya nanti saya akan menggunakan aplikasi crystal report versi 8. Oke topiknya kali ini adalah membuat aplikasi crud sederhana tentang data pegawai. Namun di dalam aplikasi ini nanti teman-teman akan mempunyai opsi yang cukup lengkap. Selain ada fitur crud dan filtering data, teman-teman bisa langsung mencetak laporannya ke dalam printer. Keren kan ??? Ok langsung saja kita mulai tutorialnya. Untuk membuat aplikasi crud ini, dibutuhkan sebuah database microsoft access. Nah untuk mempersingkat waktu, berhubung saya sudah membuatkan tutorialnya di artikel dan video saya sebelumnya, jadi saya tidak akan bahas lagi disini. Teman-teman bisa langsung b