Form dengan Relasi Tabel

Setelah membuat dua buah tabel dan dua buah Form ( Form input data mahasiswa dan Form input data Matakuliah maka langkah selanjutnya adalah membuat form untuk merelasikan kedua tabel tersebut.

Rancangan Tabel berikut :


Untuk merelasikan ketiga tabel diatas, maka field – field yang seling berelasi harus memiliki nama, type dan size yang sama.
Tabel mhs.db memiliki satu primary key yaitu stb
Tabel matakuliah.db memiliki satu primary key yaitu kodemk
Sedangkan pada tabel nilai sama sekali tidak memiliki primary key, karna boleh saja satu mahasiswa mengambil beberapa mata kuliah yang berbeda, demikian pula dalam satu matakuliah bisa saja di programkan oleh beberapa mahasiswa.

Kemudian setelah membuat tabel diatas, maka kita merancang Form berikut :





Algoritma dari Form diatas adalah sebagai berikut :
1. mulai
2. inisialisasi
3. Masukkan Text1  disini text1 adalah stb
4. Jika text1 (stb) ditemukan dalam tabel mhs.db, maka tampilkan nama, dan kelas. Jika tidak ditemukan, maka kembali untuk menginput stb
5. Masukkan Text3  disini text3 adalah kodematakuliah
6. Jika text3 (kodemk) ditemukan dalam tabel matakuliah, maka tampilkan nama mata kuliah dan jumlah sks. Jika tidak ditemukan, maka kembali untuk menginput kode mata kuliah
7. Masukkan Nilai huruf
8. Jika tombol simpan diklik, maka
• Jika text1 dan text3 ditemukan dalam tabel nilai.db, maka edit tabel, jika tidak maka tambahkan data kedalam tabel
• Simpan data stb, kodemk dan nilai pada tabel nilai.db
9. Jika Tombol Edit diklik, maka fokus ke Edit2
10. Tombol keluar untuk lanjut ke langkah 11
11. selesai

catatan pada komponen sql pada form diatas ketik perintah sqlnya sbb :
select a.stb,a.nama,b.kodemk,b.namamk,c.nilai
from mhs a, matakuliah b, nilai c
where a.stb=c.stb and b.kodemk=c.kodemk

Listingnya usahakanmilah, kan sudahmi sa kasi di kelas... ok.. bro..

Komentar

  1. pak... kalo bisa listingnya juga diikutkan soalnya kita baru belajat tentang delphi pak.. thanks

    BalasHapus
  2. http://us.i1.yimg.com/us.yimg.com/i/mesg/emoticons7/21.gif http://us.i1.yimg.com/us.yimg.com/i/mesg/emoticons7/35.gif http://us.i1.yimg.com/us.yimg.com/i/mesg/emoticons7/104.gif http://us.i1.yimg.com/us.yimg.com/i/mesg/emoticons7/24.gif

    BalasHapus
  3. salam kawan, sobat, sharing di ym yo, aku msh bingung ni ma delphi heheheh, ni ymku, mafia.cinta86@yahoo.com, ditunggu ia kawan, good luck.....manteb sob postingannya

    BalasHapus
  4. mau tanya..
    kenapa program delphi ku, tidak ada database desktopnya???

    BalasHapus

Posting Komentar

BlogList

Postingan populer dari blog ini

ACCUMULATOR, COUNTER, DAN SWITCHING

PENGERTIAN DASAR DAN SIMBOL FLOWCHART

Mengenal Program Perusak/ Pengganggu