Membuat Tabel Fakultas
Sebelum mengerjakan Tugas buatlah Tabel Fakultas pada Database Desktop menggunakan format Paradox. Struktur tabel Fakultas Sebagai Berikut:
Tambahkan data pada Fakultas seperti gambar berikut:
![]() |
Struktur Tabel Fakultas |
Tambahkan data pada Fakultas seperti gambar berikut:
Tentukan nama Alias database, melalu menu: Tools|Alias Manager, klik New, selanjutanya berina nama Alias dengan Perpustakaan, tentukan Folder dengan mengklik tombol Browse, dan klik tombol Ok.
Pembuatan Form Input Data (Tabel Fakultas)
Buatlah form Input Data Fakultas dengan membuat form baru dan letakkan control-control seperti pada gambar berikut:
![]() |
Desain Form Input Data Fakultas |
Pengaturan Properti Form Input Data Fakultas
![]() |
Pengaturan Properti pada Form Input Data Fakultas |
Pengkodean Form Input Data Fakultas
procedure
TFFakultas
.
Button1Click(Sender: TObject);
begin
//tombol tambah
Table1
.
Append;
end
;
procedure
TFFakultas
.
Button2Click(Sender: TObject);
begin
//tombol simpan
Table1
.
Post;
end
;
procedure
TFFakultas
.
Button4Click(Sender: TObject);
begin
//tombol hapus
Table1
.
Delete;
end
;
procedure
TFFakultas
.
Button3Click(Sender: TObject);
begin
//tombol batal
Table1
.
Cancel;
end
;
procedure
TFFakultas
.
Button5Click(Sender: TObject);
begin
//tombol tutup
Close;
end
;