Selamat Pagi, Siang, Sore, Malam, Sobat Coding Semua.. 

Sudah lama sekali saya tidak mampir dan menulis di Kaskus tercinta ini, kali ini saya ingin mengawali kembalinya saya ke kaskus dengan menulis tentang programming, khususnya delphi.. dari yang paling ringan dulu, saya ingin coba menulis tentang komponen yang paling sering dipakai (Selain Form) pada delphi yaitu EDIT BOX.

Kalau saya kutip dari application help RAD Studio, TEdit merupakan sebuah "Single-Line edit control" kita bisa menggunakan TEdit ini untuk memasukkan sebuah input yang diperlukan oleh user atau juga dapat memunculkan sebuah tulisan. Perbedaanya dengan TLabel, pada TEditkita dapat mencopy text pada TEdit dan paste disuatu tempat lain, sedangkan pada TLabel kita tidak bisa melakuka copy 

Untuk lebih jelas mari kita praktekan dengan langsung membuat sebuah program sederhana.

Langkah 1 :
Kalian siapkan form dan masukkan beberapa komponen ke dalam form tersebut. sebagai contoh kalian bisa susun seperti gambar dibawah ini :



Objek yang digunakan diatas terdiri dari TLabel, TEdit, TButton, TForm

Langkah 2 :
Setelah kalian selesai menyusun Objek, berikut adalah tabel properti dari tiap objek yang saya rubah, kalian bisa mengikuti settingan saya atau berkreasi sesuai dengan keinginan kalian.



Jangan lupa save project segera setelah anda menyelesaikan pembuatan antarmuka atau bisa juga disave saat pertamakali memulai pembuatan program.

Langkah 3 :
Ini adalah saatnya kita mulai coding, memasukkan bahasa pemrograman kepada objek - objek tadi sehingga melakukan proses yang diinginkan user.

Kita mulai dari TButton terlebih dahulu. karena pada contoh program kali ini event yang digunakan hanya event on klik pada TButton.

TButton yang pertama adalah BShow, pilih event onclick pada Tab Events pada Object Inspector BShow, klik 2x maka kalian akan menuju pada code editor page. Isi coding berikut pada code editor.



Pada procedure diatas kita memerintahkan program untuk menuliskan "MR. Smith" pada ENamedan "Jl. Flamboyan Raya No. 10" pada EAddress. Procedure ini akan dieksekusi saat kita ketuk tombol BShow  oleh karena itu eventnya diberinama onclick.

Dilanjutkan pada TButton yang kedua yaitu BClear, sama dengan sebelumnya gunakan event onclick dan masukkan coding berikut ini