Database

Desain Form

Malem agan-agan pecinta delphi.... bagi pemula yang seneng utak-atik delphi bisa di coba nih trik dari saya... kali ini akan saya bahas tentang cara menampilkan database yang ada di komputer atau laptop kita tentunya dengan delphi oke. . . hehe langsung saja ke tkp, buka delphi nya dan desain dulu form nya seperti gambar desain

----------------------------------------

keterangan

1. Label (pallet Standard)
2. MyConnection (pallet MySQLAccess)
3. MyQuery (pallet MySQLAccess)
4. MyDatasource (pallet MySQLAccess)
5. CRDBGrid (pallet DataControl)
6. Button (pallet Standard)

----------------------------------------

***********************************************************************

Pengaturan

• Label lihat objectInspector pada propertis >> caption ganti Daftar Semua Database

• MyConnection1 double klik dan isi seperti pada gambar di bawah setelah selesai klik button connect  

Pengaturan MyConnection
1. Root
2. Localhost
3. Klik Connect

• MyQuery1 lihat pada ObjectInspector dan atur seperti gambar di bawah

MyQuery1

• MyDataSource1 atur seperti gambah di bawah

MyDataSource1

• CRDBgrid1 atur seperti gambar dibawah

CRDBGrid1

• Button1 lihat objectInspector pada propertis >> caption ganti Show All Database In Computer

***********************************************************************

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

setelah semuanya selesai tinggan tahap terakhir memasukan rumus, dan rumus tersebut kita letakan di button >> caranya double kllik pada button1 dan masukan rumus sebagai berikut :

  MyQuery1.SQL.Clear;

  MyQuery1.SQL.Add('show databases');

  MyQuery1.Execute;

  MyQuery1.Close;

  MyQuery1.Open;

Selesia dan selamat mencoba semoga berhasil....Salam Ilmu

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Jangan lupa komennya ya hehe.....