DELPHI

LISTING PROGRAM

unit Unit1;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DB, ADODB;

type

  TForm1 = class(TForm)

    ADOConnection1: TADOConnection;

    ADOTable1: TADOTable;

    DataSource1: TDataSource;

    DBGrid1: TDBGrid;

    DBNavigator1: TDBNavigator;

    procedure DataSource1DataChange(Sender: TObject; Field: TField);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);

begin

end;

end.

LOGIKA PROGRAM

Sebelum kita masuk ke Borland Delphi 7.0, kita membuat database terlebih dahulu dengan cara:

1. Start > all program > Ms office > ms Access > file > new > blank database > create table in design view.
2. Ketikan pada field name:
• NPM (number)
• NAMA (text)
• KELAS (text)
• TANGGAL  LAHIR (date/time)
• JENIS KELAMIN(text)
3. Simpan dengan nama table1 > gunakan primary key (untuk table lebih dari satu gunakan primary key, atau ketika kita ingin menggunakan relathionship)

Langkah-langkah pembuatan pada Borland delphi:

1.      Pertama kita klik ADO pilih icon  ADOConnection

Buat pengaturan pada object inspector:

·         ConnectionString > pada Use connection String > Build > select or enter a database name > pilih data dari Ms. Acces yang telah dibuat yaitu > E:\MAHASISWA.mdb > test connection untuk menguji keberadaan file document > OK.

·         Pada name ketikan > ADOConnection1

2.      Kemudian ADOTable

Buat pengaturan pada object inspector:

·         Pada name ketikan > ADOTable1

3.      Lalu DataSource

Buat pengaturan pada object inspector:

·         Pada name ketikan > DataSource1

4.      Pada data snap pilih icon DBGrid

Buat pengaturan pada object inspector:

·         Pada name ketikan > DBGrid1

5.      Lanjutkan klik DBNavigator

Buat pengaturan pada object inspector:

·         Pada name ketikan > DBNavigator1

6.      Setelah itu kita jalankan programnya dengan cara klik tombol Run atau F9

7.      Gunakan tombol navigator untuk memindahkan ke kolom selanjutnya maupun sebelumnya. 

OUTPUT