Delphi for delphier

Memo – Menghapus data

Tingkatan Pemula
   
Kategori Dasar
   
Sub Kategori Object
   
Judul Menghapus data
   
Oleh
eko-indriyawan-png.png   Nama Eko Indriyawan
Domisili Surabaya – Darmo Satelit
Delphi Delphi 2007 for Win32
YM eko_elits
Email eko_elits@yahoo.com
Telp 031 – 605 384 36
   
Referensi Oleh Eko Indriyawan
   
Tujuan
Mengajarkan kepada para Delphier yang masih pemula tentang bagaimana cara menghapus data yang ada didalam object Memo.
  spasi
Overview
Pembahasan kali ini akan menjelaskan kepada para delphier tentang cara menghapus salah satu data pada object memo dengan menggunakan prosedur delete.
Apabila anda mengalami kesulitan dalam memahami artikel ini, langsung saja tanyakan permasalahan anda tersebut melalui email atau YM yang sudah ditunjukkan diatas.
Kemudian, dari pembahasan dan program contoh yang sudah diberikan, diharapkan anda bisa mengembangkan sendiri untuk kebutuhan program yang akan anda buat.
  spasi
Petunjuk :
Silahkan anda ikuti langkah – langkah berikut ini dengan pelan – pelan agar bisa berjalan dengan lancar sesuai dengan petunjuk yang sudah diberikan.
  spasi
Langkah 1
   
Langkah 2

Ambil beberapa object dari komponen pallete dan silahkan anda taruh kedalam form Form1.
   
  Memo1: TMemo;
Button1: TButton;
Label1: TLabel;
Bevel1: TBevel;
Button5: TButton;
Label2: TLabel;
Edit1: TEdit;
   
Langkah 3
Atur tampilannya hingga didapatkan tampilan seperti berikut ditunjukkan pada gambar ini.
   
 
tmemo0000030.png
   
Langkah 4
Lanjutkan dengan meng-klik 2x tombol Hapus dan isikan kode program didalam event OnClick seperti terlihat pada potongan kode program dibawah ini.
  spasi
 
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.Delete( StrToInt(Edit1.Text) );
end;
   
Langkah 5
Sekarang silahkan anda lanjutkan meng-compile program aplikasi anda dengan menekan tombol Ctrl + F9.
  spasi
Langkah 6
Setelah itu silahkan anda tekan tombol F9 hingga program aplikasi siap untuk dijalankan.
   
 
tmemo0000031.png
   

Langkah 7
Silahkan anda tentukan baris keberapa yang ingin anda hapus. Sebagai contoh, silahkan anda tentukan untuk data baris ke 3. Untuk lebih jelasnya silahkan lihat gambar dibawah ini.
   
 
tmemo0000032.png
   
Langkah 8

Lanjutkan dengan menekan tombol Hapus.

   
Langkah 9

Apabila proses berhasil, maka akan didapatkan tampilan seperti berikut.

   
 

tmemo0000033.png

   
Langkah 10

Berdasarkan gambar diatas, terlihat data Makasar telah terhapus dan baris pertama diawali dengan indek 0.

   
Langkah 11

Program sudah selesai, silahkan anda tutup aplikasinya

   
Download
Silahkan anda download link diatas untuk mendapatkan contoh program aplikasi secara lengkap.
Ada beberapa masukan dan keluhan dari teman – teman, bahwa ada beberapa program contoh tidak bisa dijalankan dari delphi 7. Hal ini dikarenakan program contoh dibuat dengan menggunakan Delphi 2007 for win32.
Apabila anda menggunakan D7, sebaiknya anda mengikuti pandauan dari langkah – langkah yang sudah diberikan.
Atas perhatiannya, saya mengucapkan banyak terimakasih.
  spasi
Link terkait  
   
Buku panduan
Dasar First Step To Be A Programmer
Menengah Pemrograman Database dengan Delphi dan MS SQL Server
Menengah Membangun database MLM

Buat situs web atau blog gratis di WordPress.com.

%d blogger menyukai ini: