Cara Mudah Menampilkan Data ke Dalam GRID di Delphi dari Database MySQL

Untuk menampilkan data dari database ke dalam grid langkahnya sangat mudah yaitu dengan cara mengkoneksikan grid dengan data source komponen Delphi, dimana untuk koneksinya bisa menggunakan zeos. Berikut langkah detailnya:

1.       Pastikan telah membuat Database dan Tabelnya di MySQL

2.       Design Form Seperti berikut

3.       Selanjutnya atur property komponen seperti terlihat pada tabel berikut:

Nama Komponen	Properties	Value
Tzconnection	Name	koneksi
	Database	NamaDatase MySQl (Dbkorin)
	Password	Password MySQl
	Port	3306
	user	root
	Protocol	MySQL 4.1
Tzquery	Name	QSupplier
	connection	koneksi
	SQL	Select * from Tsupplier
Dbgrid	Name	Grid Supplier
	Data Source	Ds_supplier
Data Source 1	Name	Ds_supplier
	dataset	qsupplier

4.       Kemudian buat coding di form Active seperti berikut

procedure TForm1.FormActivate(Sender: TObject);

begin

   qsupplier.Open;

end;

5.       Kemudian Jalankan Aplikasi (Tekan F9) hasilnya data supplier akan tampil di Grid

Atau Selain Menggunakan Coding diatas bisa juga menggunakan Coding seperti ini di Form Active

procedure TForm1.FormActivate(Sender: TObject);

begin

with qsupplier do

  Begin

    close;

    sql.Clear;

    sql.Add('Select * from Tsupplier');

    open;

  end;

end;

Keterangan

Hasilnya sama saja hanya jika menggunakan kode diatas di properties Kompnen Tzquery, SQL nya tidak peru di definisikan.

Selamat Mencoba

Padepokan IT Course

IT Training Center & Solution