7.4.13

Belajar Delphi 7 (Membuat Program Database)

LA Praktikum Delphi 7



Assalamu’alaikum…

            Saya ingin berbagi Pengalaman saya lagi nih mengerjakan laporan dari Laboratorium TI di Gunadarma, sebelum-sebelumnya saya juga telah memposting Tutorial LA Praktikum tentang Delphi 7 yang lain dan Visual Basic 6 Enterprise . oke deh langsung aja ya tutorial membuat Laporan Akhir Praktikum Delph 7 ini, dan saya akan berbagi Tutorial Cara Membuat Data Base pada Program Delphi 7 ini. oke cek it out.. :

  
LAPORAN AKHIR PRAKTIKUM


MATA PRAKTIKUM                       : ALGORITMA DAN PEMROGRAMAN

KELAS                                               : 1IA13

PRAKTIKUM KE-                            : 4

TANGGAL                                        : 4 April 2012

MATERI                                             : Data Base  Delphi

NPM                                                   : 54411827

NAMA                                                : Muhammad  Faris Al Fatih

NAMA KETUA ASISTEN               :

NAMA ASISTEN                              :

PARAF ASISTEN                             :

JUMLAH LEMBAR                          :   LEMBAR





LABORATORIUM INFORMATIKA
UNIVERSITAS GUNADARMA
2012

Bab 1.
  
Membuat Table

Lihat Gambar:

Membuat DataBase

Lihat Gambar:

Listing Program Timer 1

Lihat Gambar:

Listing Program Timer 2

Lihat Gambar:

Form
Lihat Gambar:


Bab 2.
  
Logika Program

 1. Analisa Progam

            Dalam Program yang saya buat ini, saya coba akan membuat tentang database pada Delphi, Sebelum membuat database pada Delphi bukalah MS. Office Acces (Klik start – all program – Ms. Office Acces) . Program ini bertujuan untuk menyimpan database dan membuat agak lebih simple. Komponen-komponen agar database itu dapat dijalankan pada Delphi, yaitu : ADO connection, ADO Table, Data Source, Timer, DBGrid, Label. Data base yang saya buat ini seputar tentang Daftar Squad Manchester United dan Pelatihnya Sir Alex Ferguson,

2. Penjelasan Program

            Pertama – tama           : untuk membuat programnya pada delphi buatlah Data base pada Microsoft office Acces, kebetulan yang saya pakai Ms. Office Acces, sedikit beda sama dengan apa yang di ajarkan di LAB dengan Ms. Offis Acces 2003 . ok kita mulai buat databesnya di Ms. Acces, pertama Buka Microsoft Acces (langkah-langkahnya sudah saya jelaskan di atas), lalu klik Blank data base, maka akan muncul tampilan : 
Lihat Gambar:
           Setelah itu klik “file name” (namanya terserah anda) klik icon berbentuk folder, itu gunanya untuk menyimpan database kita dimana apakah di “C” atau di “D” suka suka kita saja, tapi seve as typenya harus kita ganti dengan Microsoft Acces 2002-2003, gunanya untuk agar terbaca pada ADO connection pada Delphi-nya . karna saya menggunakan Ms. Acces 2007 . Dalam Ms. Accesnya saya hanya menggunakan 3 field yaitu No punggung, No Id dan NAMA. Simpan Table dengan Nama yang saya gunakan adalah Coba, simpan dengan format .mdb .

            Langkah ke 2              : buatlah Form pada Delphi masukan komponen-komponen berikut ini : ADO Connection,ADO Table,Data Source,DB Grid, Label(untuk nama) dan Timer, double klik ADO Connection Dan akan terbuka kotak dialog seperti ini :

Lihat Gambar:
Klik build, setelah Build kita klik akan muncul kotak dialog seperti ini :

Lihat Gambar:
             Pilih Data base yang tadi kita buat di Ms.Acces, jangan klik ok dulu, Klik Test Connection untuk mengetahui keberadaan file kita ada apa tidak, jika berhasil maka data kita yang tadi kita buat memang ada, dan akan muncul kotak dialog seperti ini:
Lihat Gambar:

Lalu Lakukan Hal yang sama pada ADO Table. Hal yang perlu di perhatikan sama dalam membuat ADO table sama halnya pada ADO connection .

            Lalu double klik pada Komponen ke-2 Timer yang kita buat pada Delphi Dengan masukkan Code berikut :
  
Jika di TULIS Kodingan Keseluruhan TIMER-nya ( Timer 1 dan 2 )

procedure TForm1.Timer1Timer(Sender: TObject);
begin
If (Label1.left<=600)then
begin
label1.left:=label1.left + 30;
end;
if (Label1.left>600)then
begin
label1.left:=20;
end;
end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
If (Label2.left<=600)then
begin
label2.left:=label2.left + 30;
end;
if (Label2.left>600)then
begin
label2.left:=20;
end;
end;

end.

            Langkah 3 setting properties pada ADO Table, yaitu ubah Table Name dengan “COBA”

Ubahlah Active menjadi True. Dan Selesai.

Bab 3.
  
Output


Lihat Gambar:
             Output yang akan di hasilkan, seperti ini dengan Nama Labelnya “Daftar Squad M.U dan Pelatih : Sir Alex Ferguson” Akan bergerak dari kiri ke kanan atau lebih tepatnya dalam bentuk marquee

            Sekian yang bisa saya posting kepada kalian semua tentang Membuat Data Base Menggunakan Delphi 7, semoga tutorial membuat Membuat Data Base Menggunakan Delphi 7 ini bermanfaat yah.. good luck mengerjakan Laporan Akhir Praktikum dari Gunadarma-nya.. ^^


Wassalamu'alaikum..


Download Delphi 7 : Disini

Download Document Lengkap VB6 dan Delphi 7 : Disini


Baca Selengkapnya : Disini

8 komentar:

  1. dulu aku bikin database pake foxpro...

    BalasHapus
  2. Kalau aku gak bikin pakai apa-apa cuz gak ngerti ^^ ., mampir aja, semangat, pasti berguna bagi yang mencari artikel terkait

    BalasHapus
    Balasan
    1. oke bang, terima kasih telah berkunjung.. ^^

      Hapus
  3. wah.. keren pake foxpro.. ^^
    saling tuker pengetahuan aja ya sob..
    makasih atas kunjungannya..

    BalasHapus
  4. blom bisa klo pakai foxpro ...baru bisa.
    ijin baca gan....

    BalasHapus
    Balasan
    1. silahkan bang.. terima kasih atas kunjungannya ya. ^^

      Hapus
  5. Balasan
    1. sama sama kang, semoga bermanfaat.. terima kasih tas kunjungannya.. ^^

      Hapus

Hiasilah "Pengetahuan" Dengan Bingkai "Ketulusan"