Başlangıç > Kodlar > Delphi.Net(2005) ile access üzerinde tablo oluşturmak

Delphi.Net(2005) ile access üzerinde tablo oluşturmak

MDB oluşturmak ve içine table yaratmak


Yapacağımız işlem : Delphi 2005 kullanarak projeden hiç ayrılmadan Access veritabanı oluşturmak ve içine tablo yaratmak.

Öncelikle aşağıdaki adımları mutlaka izlememiz gerekiyor.Bu adımlar bize Access veritabanını oluşturmamızı sağlayacak delphi kütüphanelerini sağlayacak.

1 - Menu / Component / Import Component
2 - Import Type Library
3 - Microsoft ADO ext 2.7 (buluyoruz ve seçiyoruz)
4 - Next butonu (açılan pencerede işlem yok isteseniz component paleti seçebilirsiniz.)
5 - Finish butonu

Bundan sonra ortaya çıkarttığımız componentimizi Delphi'ye dahil etmemiz gerekiyor.Bunun için ;

File / New / Packcage seçiyoruz.Ekranın sol tarafında Project manager içinde packcage1 şeklinde belirmiş olması gerekiyor.Bu isme sağ tıklayıp ADD diyoruz.

Şimdi açılan pencereden C:\Program Files altında delphi 2005'in kurulu olduğu klasöre ulaşıyoruz.Klasördeki Imports klasörüne giriyoruz.Burada biraz önce import ettiğimiz componentin .Pas dosyası bulunuyor.Seçiyoruz ve ekliyoruz.
Şimdi packcage1'imize yeni bir ad veriyoruz.Mesela AccessAdo gibi.Daha sonra bu packcage sağ tıklayıp install diyoruz.Bir problem çıkmazsa olumlu bir mesaj penceresi göreceksiniz.Artık yeni componentlerimiz kullanıma hazır.
Formumuza bir tane Catalog , adocommand , adoquery , adoconnection koyuyoruz.Diğer bileşenler size kalmış.Artık veritabanımızı oluşturuyoruz.Aşağıdaki kod veritabanı oluşturmak için kullanılır.

var
veritabani , veritabaniyolu : String;
Begin
Veritabaniyolu := 'c:\dbname.mdb';
veritabani := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source =' +    veritabaniyolu + ';Jet OLEDB:Engine Type=5';
AdoCommand1.ConnectionString := veritabani;
Catalog1.Create1(Veritabani);
End;

Veritabanı bu kod sayesinde oluştu. Şimdi içine tablo oluşturalım. Bunun için adoconnection ile bağlantı kurduğumuz yeni veritabanımız ile adoquery nesnesi birbirine bağlı olması gerekiyor.

Adoconnection1.connectionstring:=veritabani;
Adoquery1.SQL.Clear;
Adoquery1.SQL.Add('CREATE TABLE tablo_adi ( ');
Adoquery1.SQL.Add('id AutoIncrement NOT NULL PRIMARY KEY, ');
Adoquery1.SQL.Add('ad VARCHAR(15), ');
Adoquery1.SQL.Add('soyad VARCHAR(15) ); ');
Adoquery1.ExecSQL;

İşte bu kadar ; Hiç programımızdan çıkmadan Access veritabanı ve içine tablo oluşturduk. İd AutoIncrement satırı otomatik sayı anlamına geliyor.Siz isterseniz Tinyint veya number gibi veri tipleri kullanabilirsiniz.
Delphi kodları ile SQL kullanarak Access veritabanı oluşturduk ve içine kodlar ile autoincrement alan tanımlayıp tablo oluşturduk.

Yazan : BigBoy / Gencpro Yönetimi / 2007 / www.gencpro.com


TD Software


  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: