MEMBUAT DATABASE MS.ACCESS 2010 DENGAN DEPHI 7.0

on Selasa, 11 Desember 2012

Proses Pembuatan Program
Pertama buat database menggunakan Ms.Access.
1.Buka Ms.Access.
2.File -> New -> Blank Database.



3.Isi nama File Name “Data Masantri MSAA” -> klik tombol  -> pilih tempat penyimpanan database -> Ok -> Create.


4.Klik tombol save -> save dengan nama “Mahasantri MSAA” -> Ok.


3.Lalu klik tombol Design View.
4.Buat table baru dengan format :
No
Field Name
Data Type
Properties
Value
1
Nama Mahasiswa
Text
Field Size
30
2
NIM
Text
Field Size
10
3
Fakultas/Jurusan
Text
Field Size
30
4
Jenis Kelamin
Text
Field Size
15
5
Alamat Lengkap
Text
Field Size
70
6
Mabna
Text
Field Size
20

5.Klik tombol ‘save’.

Membuat program interface (antarmuka) database Mc.Access dengan Delphi 7.0
1.Jalankan program Delphi 7.0
2.Masukkan komponen – komponen sebagai berikut:
No
Komponent
Properties
Value
1
ADOConnection1  (ADO)
Connection String
Lihat pada cacata di bawah.*
Login Prompt
False
Connected
True
2
ADOTable1  (ADO)
Connection
ADOConnection1
Table Name
Mahasantri MSAA
Active
True
3
DataSource1  (Data Access)
Data Set
ADOTable1
4
DBGrid1  (Data Controls)
Data Source
DataSource1
5
DBNavigator  (Data Controls)
Data Source
DataSource1
6
GroupBox1  (Standard)
Caption
Data Pengisian
7
Button1  (Standard)
Name
Button1
Caption
Save
8
Button2  (Standard)
Name
Button2
Caption
Cancel
9
Label1  (Standard)
Caption
Nama Mahasiswa
10
Label2  (Standard)
Caption
NIM
11
Label3  (Standard)
Caption
Fakultas/Jurusan
12
Label4  (Standard)
Caption
Jenis Kelamin
13
Label5  (Standard)
Caption
Alamat Lengkap
14
Label6  (Standard)
Caption
Mabna
15
Edit1  (Standard)
Text
-
16
Edit2  (Standard)
Text
-
17
Edit3  (Standard)
Text
-
18
Edit4  (Standard)
Text
-
19
Edit5  (Standard)
Text
-
20
ComboBox1  (Standard)
Text
-
Items
Lihat pada cacatan di bawah.*

Tata komponen – komponen , seperti tampilan program ini :


*Catatan :
Property Connection String di buat dengan cara sebagai berikut :
Klik pada property Connection String pada Object Inspecktor, sehingga akan muncul sebagai berikut :


1.Klik tombol Build, pada Provider pilih “Microsoft Jet 4.0 OLE Provider”  -> Next.


2.Klik tombol    di sebelah kanan  Select or enter a database name -> pilih database yang sudah dibuat sebelumnya -> Open.

3.Klik tombol Test Connection.


Items pada ComboBox1 di buat dengan cara sebagai berikut :
1.Klik pada property Items pada Object Inspecktor, sehingga akan muncul kotak dialog.
2.Isi String list Editor dengan "Laki - Laki" dan " Perempuan".
3.Klik Ok.

Codingnya :
Double klik pada Button2 dengan caption “Cancel” dan masukkan source code seperti berikut :
procedure TForm1.Button2Click(Sender: TObject);
begin
  edit1.Clear;
  edit2.Clear;
  edit3.Clear;
  edit4.Clear;
  edit5.Clear;
  comboBox1.Clear;
end;

Double klik pada Button1 dengan caption ”Save” dan masukkan source code seperti berikut :
procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.Open;
adotable1.Append;
  adotable1.FieldByName('Nama Mahasiswa').AsString:=edit1.Text;
  adotable1.FieldByName('NIM').AsString:=edit2.Text;
  adotable1.FieldByName('Fakultas/Jurusan').AsString:=edit3.Text;
  adotable1.FieldByName('Jenis Kelamin').AsString:=comboBox1.Text;
  adotable1.FieldByName('Alamat Lengkap').AsString:=edit4.Text;
  adotable1.FieldByName('Mabna').AsString:=edit5.Text;
  adotable1.Post;
    edit1.Clear;
    edit2.Clear;
    edit3.Clear;
    edit4.Clear;
    edit5.Clear;
    comboBox1.Clear;
end;

Jika, semuanya telah benar……
Selanjutkan Run Program yang sudah dibuat,
1.Klik Run -> Run.
2.Atau tekan tombol F9 pada keyboard.


silakan download programnya disini: http://www.4shared.com/rar/XWCDThjm/MSAA.html

Walaupun tutorial ini masih sederhana, harus tetap tinggatkan kreatifitasnya.
Ok….
Semoga bermanfaat…



Free Template Blogger collection template Hot Deals BERITA_wongANteng SEO theproperty-developer

0 komentar:

Posting Komentar