Minggu, 29 April 2012

Database Design TADOQuery dan TADOTable ADO di Delphi


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.