Program Database Mahasiswa Menggunakan Delphi & Microsoft Access

Pengertian Borland Delphi

Borland Delphi7 merupakan suatu bahasa pemrograman yang memberikan berbagai fasilitas pembuatan aplikasi visual. Keunggulan bahasa pemrograman ini terletak pada produktifitas, kualitas, pengembangan, perangkat lunak, kecepatan kompailer, pola desain yang menarik serta diperkuat dengan pemrogramannya yang terstruktur. Keunggulan lain dari Delphi adalah dapat digunakan untuk merancang program aplikasi yang memiliki tampilan seperti aplikasi lain yang berbasis Windows. Khusus untuk pemrograman database. Borland Delphi menyediakan fasilitas objek yang kuat dan lengkap yang memudahkan programer dalam membuat program. Format database yang dimiliki Delphi adalah format database Paradox, dBase, MS.Access, ODBC, SyBASE, dan lain-lain. Dan Borland Delphi adalah suatu bahasa pemograman development language yang digunakan untk merancang suatu aplikasi program. Dan Borland Delphi 7 merupakan suatu bahasa pemrograman yang memberikan berbagai fasilitas pembuatan aplikasi untuk mengolah teks, grafik, angka, database dan aplikasi web.

Sejarah Borland Delphi

Borland Delphi dirilis pertama kali pada bulan Februari 1995 oleh Charlie Calvert dan Zack Urlocker. Mareka berdua tergabung dalam Borland International Corporation. Kemudian pada tahun 1996 dirilis kembali Delphi 2. Sekarang sudah mencapai perkembangannya sampai dengan Delphi 10.
Delphi merupakan bahasa pemrograman berbasis Windows yang dikembangkan dari bahasa Pascal. Tetapi bukan berarti untuk mempelajari bahasa pemrograman Delphi harus mempelajari Pascal terlebih dahulu, karena Borland Delphi sudah dirancang sedemikian rupa sehingga memudahkan bagi seorang pemula untuk merancang aplikasi berbasis Windows dengan Borland Delphi, mulai dari sebuah program sederhana sampai dengan program yang berbasiskan client/server atau jaringan. Delphi, termasuk aplikasi yang dapat digunakan untuk mengolah teks, grafik, angka, database dan aplikasi web.

Kelebihan Dan Kekurangan Borland Delphi

Kelebihan :
  1. Mudah digunakan
  2. Size yang kecil
  3. Fitur unik
  4. Dapat di akses di berbagai format
  5. Komponennya didukung oleh banyak Third Party Software
Kekurangan :
  1. Kompatibilitas bahasa yang kurang baik
  2. Tidak dapat berjalan di sistem operasi yang tidak didukung

PROGRAM MAHASISWA

  
  Untuk tampilan programnya seperti diatas, jadi dalam program ini dibuat menggunakan Delphi dan Microsoft Access sebagai databasenya. Untuk menghubungkan databasenya kita menggunakanADOTable kemudian ada kolom seperti Nama, NPM, Jenis Kelamin, Agama, dan juga alamat. Untuk tabel Nama, NPM, dan juga alamat menggunakan Edit Text sebagai inputannya, Kemudian untuk Jenis Kelamin disini menggunakan RadioButton yang bisa dipilih salah satu, Kemudian untuk Tabel Agama menggunakan ComboBox yang bisa memuat beberapa inputan yang sudah tersedia berupa Array. Terakhir ada 4 Button yang mana setiap button punya fungsinya masing-masing Seperti "TAMBAH" untuk menambah data, kemudian ada "EDIT" untuk mengedit data yang salah, lalu ada "DELETE" untuk menghapus data dan terakhir ada "CANCEL" jika inputan data ingin dikosongkan.

Button TAMBAH



Source Code Button "TAMBAH"

begin
  if RadioButton1.Checked = true then
    begin
     jeniskelamin := 'Laki - Laki'
    end
  else if RadioButton2.Checked = true then
    begin
      jeniskelamin := 'Perempuan'
    end;
ADOTable1.FieldByName('Nama').AsString  := Edit1.Text;
ADOTable1.FieldByName('NPM').AsString  := Edit2.Text;
ADOTable1.FieldByName('Jenis Kelamin').AsString  := jeniskelamin;
ADOTable1.FieldByName('Agama').AsString  := ComboBox1.Text;
ADOTable1.FieldByName('Alamat').AsString  := Edit3.Text;
ADOTable1.Post;
Edit1.Text := '';
Edit2.Text := '';
Edit3.Text := '';

end;

    Jadi untuk Button "TAMBAH" berfungsi untuk menginput data mahasiswa yang dimana disini Button mengambil data dari RadioButton untuk jenis kelamin. EditText untuk Nama,NPM, dan juga Alamat dan ComboBox untuk agama, kemudian setelah itu data akan disimpan dengan Post pada ADOTable tersebut jadi otomatis data akan langsung masuk ke database yang telah dibuat.

Button EDIT




Source Code Button "EDIT"

begin
  if Button2.Caption = 'EDIT' then
    begin
      Edit1.Text := ADOTable1.FieldByName('Nama').AsString;
      Edit2.Text := ADOTable1.FieldByName('NPM').AsString;
      jeniskelamin := ADOTable1.FieldByName('Jenis Kelamin').AsString;
      ComboBox1.Text := ADOTable1.FieldByName('Agama').AsString;
      Edit3.Text := ADOTable1.FieldByName('Alamat').AsString;
      Button2.Caption := 'EDITED';
    end
  else if Button2.Caption = 'EDITED' then
    begin
      if RadioButton1.Checked = true then
        begin
          jeniskelamin := 'Laki - Laki';
        end
      else if RadioButton2.Checked = true then
        begin
          jeniskelamin := 'Perempuan';
        end;
      ADOTable1.Edit;
      ADOTable1.FieldByName('Nama').AsString := Edit1.Text;
      ADOTable1.FieldByName('NPM').AsString := Edit2.Text;
      ADOTable1.FieldByName('Jenis Kelamin').AsString := jeniskelamin;
      ADOTable1.FieldByName('Agama').AsString := ComboBox1.Text;
      ADOTable1.FieldByName('Alamat').AsString := Edit3.Text;
      ADOTable1.Post;
      Button2.Caption := 'EDIT';

    Jadi untuk Button "EDIT" digunakan untuk mengubah data yang salah atau ingin diubah. Disini Button mengambil data dari ADOTable kemudian user bisa mengubah data sesuai dengan keinginannya.

Source Code Button "DELETE"




begin
  ADOTable1.Delete;
end;

    Untuk button delete ini sangat simpel, karena hanya untuk menghapus database yang diinginkan. Jadi data yang telah dihapus tidak akan muncul lagi pada tabel

Button CANCEL




Source Code Button "CANCEL"

begin
  Edit1.Text := '';
  Edit2.Text := '';
  Edit3.Text := '';
end;

    Untuk button cancel ini digunakan untuk mengosongkan data jika ada salah input maupun malas menghapus satu-satu data.

KESIMPULAN
    
    Program Database Mahasiswa ini sangat simpel namun bisa digunakan pada saat belajar Delphi dengan menggunakan Microsoft Access sebagai Databasenya walapun interfacenya kurang memadai namun untuk aplikasi lawas ini tergolong cukup.




0 comments:

Posting Komentar