Menghapus Teks Pada Edit Box – Delphi 7

Assalamualaikum Temen Temen Semua, Salam Luar Biasa hari ini. Nah Pada Kesempatan Kali ini kita bakal Belajar Borland Delphi 7 lagi nich. Kalau Materi Sebelumnya Kita Belajar Menampilkan Teks Pada Component Edit Box Di Delphi 7 Maka Kali ini kita akan belajar Untuk Menghapus Teks Yang Ada Pada Component Edit Box di Delphi 7. Materinya Mudah Kok, Dan Jangan Lupa untuk mengerjakan Latihan latihannya yang tersedia di akhir materi ya, sambil melatih Apa Apa yang sudah Kita Bahas Di Postingan ini. Mari Langsung Aja Kita Mulai Materi Kita Kali ini.

Pertama tama Design Form Sebagai Berikut :

Ubah Properties Name Setiap Object Sebagai Berikut :

Berikut Alur Aplikasinya: Pada Saat Program Dijalankan Maka Nama, Kelas, No Telp dan Alamat kita muncul pada Component Edit Box dan Memo. Nah Jika Kita Mengklik Button_Bersih Maka Seluruh Teks Pada Edit Box Dan Memo Hilang. dan yang terakhir jika Kita Mengklik Button_Keluar maka akan keluar dari program.

Berikut List Codenya:

Pada Saat Dijalankan Maka Teks Muncul Pada Edit Box —> Event FormCreate pada frm_materi3:

procedure Tfrm_materi3.FormCreate(Sender: TObject);
begin

  edit_nama.Text:='Eko Wardoyo';
  edit_kelas.Text:='11.7G.01';
  edit_notelp.Text:='0857xxxxxxxx';
  memo_alamat.Text:='Jln Pertanian Selatan RT 014 RW 03 No 12 Klender Jakarta Timur';

end;

Pada Saat Button_bersih di Klik Maka Akan Menghapus Teks Pada Edit Box dan Memo, Menggunakan Event On Click Pada Component Button_Bersih : list code nya hampis sama dengan menampilkan teks hanya saja yang kita tampilkan kosong jadi (‘Eko Wardoyo’) kita ganti menjadi (‘ ‘) kutip kutip yang bisa diartikan akan menampilkan teks kosong (^o^)*mudah kan.

procedure Tfrm_materi3.button_bersihClick(Sender: TObject);
begin

  edit_nama.Text:='';
  edit_kelas.Text:='';
  edit_notelp.Text:='';
  memo_alamat.Text:='';

end;

Pada Saat Button Keluar Di Klik Maka Akan Keluar dari Program Menggunakan Event On Click Pada Component Button_keluar :

procedure Tfrm_materi3.button_keluarClick(Sender: TObject);
begin

  close;

end;

Berikut ini adalah Hasil Applikasi Pada Saat Dijalankan ( Press F9 ) :

Nah Berikut ini tampilan Form Pada Saat Button Bersih Di Klik :

Nah gampang Kan, Yoiii Dung Kalau mau dipelajari gak ada yang susah kok ‘Belajar Delphi Mudah Kok’. Nah Mungkin Untuk Materi Kali ini itu dulu mudah mudahan kedepan masih punya kesempatan menyampaikan list code delphi lainnya. Buat temen temen yang mau coba latihan yang saya buat untuk materi kita kali ini bisa di download link di bawah ini. Ikuti Soalnya kemudian kerjakan jika ada kesulitan bisa di Liat Aja Listing Codenya yang juga saya lampirkan :

Download Latihan 3 – Menghapus Teks Pada Component Edit Box & Radio Button


Download Project Latihan 3

Nah See You Next Lesson Temen Temen Semua, Salam Luar Biasa.

Eko Wardoyo

___________________________________________________________________________

Artikel Terkait Lainnya :

– Menampilkan Teks Pada Edit Box – Delphi 7

– Pengenalan Design Form Delphi 7 – Latihan 1

– Pengenalan Borland Delphi 7

___________________________________________________________________________

2 thoughts on “Menghapus Teks Pada Edit Box – Delphi 7

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s