Untuk membuat aplikasi database
menggunakan design dengan TADOTable & TADOQuery, ikuti langkah-langkah
berikut :
1. Buka Code Gear Delphi. Klik menu File – New VCL Forms Application – Delphi for Win32.
2. Akan
ditampilkan Form1 yang masih kosong. Tambahkan komponen TLabel Tab Standard,
TADOQuery dari Tab dbGo, TDBEdit, TDBGrid, dan TDBNavigator dari Tab Data
Controls, serta TDataSource dari Tab Data Access.
3. Kemudian
set properti-propertinya sebagai berikut :
ADOConnection1 :
- ConnectionString : Provider=Microsoft.Jet.OLEDB.4.0;User
ID=Admin;Data Source=world.mdb;Mode=Share Deny None;Extended Properties="";Jet
OLEDB:System database="";Jet OLEDB:Registry Path="";Jet
OLEDB:Database Password="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database
Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk
Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create
System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy
Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet
OLEDB:SFP=False
- LoginPrompt : False
- Connected : True
ADOQuery1 :
- Connection :
ADOConnection1
- SQL : SELECT Name,
Address, Phone FROM Contacts
- Active : True
DataSource1
- DataSet : ADOQuery1
DBGrid1
- DataSource : DataSource1
DBNavigator1
- DataSource : DataSource1
DBEdit1
- DataSource : DataSource1
- DataField : Name
DBEdit2
- DataSource : DataSource1
- DataField : Address
DBEdit3
- DataSource : DataSource1
- DataField : Phone
5. Klik menu Run - Run (F5) untuk
menjalankan program.
