1.Ambil komponen TSQLTransaction , dan set sbb:
- Name = tran
- Action = caCommitRetaining
2.Ambil komponen TODBCConnection, dan set sbb:
- Name = con
- Transaction = tran //arahkan ke komponen yg sudah diambil sebelumnya
- Driver = Microsoft Access Driver (*.mdb)
- Params = DBQ= path file mdb;PWD=password database //PWD optional jika pakai password
- Connected = True //Jika error akan muncul pesan sebaliknya jika berhasil tidak muncul apa apa
3.Ambil komponen TSQLQuery, dan set sbb:
- Name = sq
- Database = con
- Transaction = tran
- UsePrimaryKeyAsKey =False
- UpdateMode = UpWhereAll
- ParseSQL =True
- SQL = SELECT * FROM Kontak //Kontak adalah nama table dalam file mdb
- DataSource = ds
4.Ambil komponen TDataSource, dan set sbb :
- Name = ds
- DataSet = sq
5.Ambil komponen TDBGrid, dan set sbb:
- Name = dbg
- DataSource = ds
6.Set sq.Active = True //Jika berhasil table akan muncul pada form