Tutorial : Membuat Program Database Delphi

Pertama buatlah database dengan nama sembarang kemudian ketikan nama difield yang di inginkan. Di sini kita akan membuat field Nama, NPM, Jurusan, dan Kelas. Buatlah seperti gambar di bawah.

Kalau sudah membuat databasenya kita save dengan sama sembarang . di sini saya save dengan nama table ‘Maha’ dan nama database ‘roto’. Kalau sudah kita close saja Ms accessnya. Sekarang kita akan lanjut membuat program database pada Delphi. Buka Delphi dengan cara klik Start – All Program – Borland Delphi – Delphi 7 atau bias mengklik dua kali ikon yang terletak di desktop jika ada

          Kalau sudah kita akan membuat form login terlebih dahulu.

Buatlah seperti form berikut :

·        Ubah caption label1 menjadi : Login Database

·        Ubah caption label2 menjadi : Username

·        Ubah caption label3 menjadi : Password

·        Kosongkan text pada edit1 dan edit2

·        Ubah caption button1 menjadi : PROSES

Lalu masukan kodingan berikut supaya program berjalan dengan lancara pada saat program tersebut kita run

         Untuk if jika kita mengetikan username dengan nama SALMAN dan password dengan nama SUNGKAR maka setelah di tekan button akan muncul pesan bahwa login  sukses. Untuk else jika username dan password yang di ketikan berbeda maka akan muncuk bahwa password yang di ketikan salah

Form1.hide di maksudkan untuk menyembunyikan form1 dan form2.show adalah untuk memunculkan form2 ketika button di tekan. Dimana form1 ini merupakan form password jadi saat kita memasukan username dan password maka program akan berlanjut pada form2.

Untuk button 2 ini menggunakan Application.Terminate;  untuk keluar dari program pada saat kita menekan tombol exit

Selanjutnya adalah untuk membuat form2 di mana form2 ini merupakan form database yang merupakan inti dari program yang kita buat. Buatlah form dengan menggunakan :

- AdoConnection           

- ADOTable                  

- DataSource                   

- DbNavigator      

- DbGrid               

Buatlah tampilan formnya seperti gambar berikut 

Lalu ubahlah :

Kemudian Pada ADOConnection , kita atur di object inspector:

# ConnectionString  >> Klik Build

# Connected       >> ubah menjadi True.

# Connection      >> pilih ADOConnection1.

# TableName     >> pilih nama tabel yang tadi dibuat.

# Active               >> ubah menjadi True.

# DataSet >> pilih ADOTable1

# DataSource >> pilih DataSource1

# ShowHint >> ganti menjadi True

# DataSource >> pilih DataSource1

Kemudian pada form Data Link Properties pilih Microsoft Jet 4.0 OLE DB Provider kemudian klik ok

Kemudian klik  dan masukan database yang telah kita buat tadi lalu klik open.

Jika sudahlah kliklah test Connection dan jika sukses akan muncul tulisan successfull. Tetapi jika error, periksa lagi file databasenya dan yakinkan bahwa microsoft access telah ditutup.

# LoginPrompt    >> ubah menjadi False.
# Connection      >> pilih ADOConnection1.
# TableName     >> pilih nama tabel yang tadi dibuat.
# Active               >> ubah menjadi True.
# DataSet >> pilih ADOTable1
# DataSource >> pilih DataSource1
# ShowHint >> ganti menjadi True
# DataSource >> pilih DataSource1

# Connected       >> ubah menjadi True.

Jika pengaturan object inspector telah di lakukan maka akan seperti gambar di bawah ini