Delphi for delphier

Listbox – Menambahkan data text

Tingkatan Pemula
   
Kategori Dasar
   
Sub Kategori Object
   
Judul Menambahkan data text kedalam object ListBox
   
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 menambahkan data Text kedalam object TListBox.
  spasi
Overview
Tutorial ini akan membahas tentang materi penambahan data text kedalam object ListBox. Semoga para Delphier yang masih pemula bisa mengikuti langkah-langkah yang diberikan dengan baik.
Proses penambahan data text ini dilakukan dengan menggunakan prosedur Add. Sebenarnya anda juga bisa menggunakan prosedur Append yang mana fungsinya sama yaitu menambahkan data text kedalam ListBox. Mungkin perlu sedikit saya berikan info bahwa prosedur Append itu didalamnya memanggil prosedur Add.
procedure TStrings.Append(const S: string);
begin
Add(S);
end;
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.
   
  ListBox1: TListBox;
Label1: TLabel;
Button1: TButton;
Edit1: TEdit;
Panel1: TPanel;
Label2: TLabel;
Bevel1: TBevel;
Button2: TButton;
   
Langkah 3
Atur tampilannya hingga didapatkan tampilan seperti berikut ditunjukkan pada gambar ini.
   
 
pemulalistbox000001.png
   
Langkah 4
Lanjutkan dengan meng-klik 2x tombol Tambah dan isikan kode program didalam event OnClick seperti terlihat pada potongan kode program dibawah ini.
  spasi
 
procedure TForm1.Button1Click(Sender: TObject);
begin
// Menambahkan data kedalam ListBox
ListBox1.Items.Add( Edit1.Text );
// Mengosongkan kotak inputan
Edit1.Clear;
// Mengarahkan mouse ke kotak inputan
Edit1.SetFocus;
{
anda bisa juga menuliskan dengan kode seperti berikut ini :
ListBox1.Lines.Append(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.
   
 
pemulalistbox000002.png
   
Langkah 7
Selanjutnya silahkan anda isikan data Edit1 seperti terlihat pada gambar dibawah ini.
   
 

pemulalistbox000002.png

   
Langkah 8
Setelah itu anda tekan tombol Tambah hingga didapatkan tampilan seperti berikut ini.
   
 
pemulalistbox000003.png
   
Langkah 9

Silahkan anda lanjutkan dengan menentukan data Eko Indriyawan. Untuk lebih jelasnya silahkan anda lihat gambar dibawah ini.

   
 

pemulalistbox000004.png

   
Langkah 10

Lanjutkan dengan menekan tombol Tambahhingga didapatkan tampilan seperti ditunjukkan oleh gambar dibawah ini.

   
 

pemulalistbox000005.png

   
Langkah 11
Program sudah selesai, silahkan anda tutup.
   
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: