Cara membuat tabel

1. masuk ke delphi pilih Tool → database dekstop → ( sebelumnya kita akan buat folder atau tempat atau untuk menyimpan database tersebut) pilih Tool → Alias Manager → klik New lalu isi database alias → Browse ( Simpan database tsb ) → ok → yes

2. file → new → table → pilih jenis filenya contoh : Paradox 7 → ok → isi tabelnya → selesai LALU DI save → ok.

Cara membuat Formnya yaitu ;

1. Buat tampilan form seperti di bawah ini dengan menggunakan komponen- komponen yang tertera.

2. Untuk memberikan hubungan dengan database yang di buat tadi, tambahkan komponen ADOConnection dari Tab ADO ke form. Selanjutnya klik tombol ‘...’ pada properti ConnectionString di Object Inspector.

3. Selanjutnya akan muncul kotak dialog Form1.ADOConnection ConnectionString, Pada kondisi default akan terpilih Use ConnectionString, Lalu Klik tombol Build.

4. Kotak dialog yang selanjutnya akan muncul Data Link Properties, disini a

nda harus memilih provider yang sesuai dengan database anda. Pada contoh ini penulis menggunakan database MS Access, maka provider yang dipilih adalah Microsoft Jet 4.0 OLE DB provider. Kemudian klik tombol next.

5. Selanjutnya adalah menentukan lokasi file database yang akan dihubungkan, jika lokasi file database berada dalam satu folder dengan proyek delphi, maka pada kotak isian Select Or Enter a database name, hanya cukup menuliskan nama file database lengkap dengan ekstensinya, lalu klik OK. Dan Klik OK lagi.

6. Untuk mengakses tabel-tabel yangterdapat dalam database kita bisa menggunakan komponen ADOQuery untuk mengakses tabel dalam database. Caranya tambahkan komponen ADOQuery dari Tab ADO ke form. Lalu atur properti Connetion menjadi ADOConnection, masukkan tulisan ‘select * from Mahasiswa’ pada properti SQL, lalu ubah properti active menjadi True.

7. Untuk menampilkan isi dari tabel pada ADOQuery1 ke DBGrid1, kita memerlukan sebuah komponen DataSource dari Tab Data Access ke form. Lalu atur properti DataSet menjadi ADOQuery1.

8. Untuk menghubungkan DataSource1 ke DBGrid1, atur properti DataSouerce pada DBGrid1 menjadi DataSoerce1. Setelah itu maka isi dari tabel Mahasiswa akan ditampilkan dalam DBGrid1.

Untuk membuat sourcecode programnya dapat dilihat di bawah ini ;

1. Pada Button Tambah di klik dua kali, lalu ketik sourcecode ini yang berguna untuk menambahkan data atau menyimpan data yang baru ke dalam database.

procedure TForm1.Button1Click(Sender: TObject);

begin

try

adoquery1.Insert;

adoquery1.FieldByName('Nama').AsString:=Edit1.Text;

adoquery1.FieldByName('Nim').AsString:=Edit2.Text;

adoquery1.FieldByName('tmplhr').AsString:=Edit3.Text;

adoquery1.FieldByName('tgllhr').AsDateTime:=DateTimePicker1.DateTime;

adoquery1.FieldByName('Jurusan').AsString:=Edit5.Text;

adoquery1.FieldByName('Alamat').AsString:=Edit6.Text;

adoquery1.Post;

except

adoquery1.Cancel;

showmessage(' Salah Input ');

end;

end;

2. Pada Button Hapus di klik dua kali, lalu ketik sourcecode ini yang berguna untuk menghapus data pada form input data mahasiswa.

procedure TForm1.Button2Click(Sender: TObject);

begin

Edit1.Text:=' ';

Edit2.Text:=' ';

Edit3.Text:=' ';

Edit5.Text:=' ';

Edit6.Text:=' ';

end;

3. Pada Button Keluar di klik dua kali, lalu ketik sourcecode ini yang berguna untuk Keluar dari program data input mahasiswa.

procedure TForm1.Button3Click(Sender: TObject);

begin

application.Terminate;

end;