Veri Tabanları

VERİ TABANI DOSYALARI ÜZERİNDE İŞLEM YAPMAK

Bu bölümde DataBase Desktop veya dBASE, Paradox gibi veri tabanı programları ile hazırlanmış olunan veri tabanı dosyaları üzerinde Delphi projeleri dahilinde nasıl işlem yapıldığını anlatacağım. Bu işlemi bir önceki bölümde hazırladım ve ADRES.DBF adıyla kaydettiğim veri tabanı dosyası üzerinde anlatacağım.
Bu amaçla yapılacak işlem, Component Palette araç çubuğundaki Data Access sekmesine tıklamaktır.

Data Access sekmesinde daha önce hazırlanıp kaydedilen bir veri tabanı dosyasının içeriğini görüntülemek veya dosyaya yeni kayıtlar eklemek için ilk gerek duyulan kayıtın adı Table’ dir. Component Palette araç çubuğunda Data Accsess sekmesinde yer alan Table düğmesi seçili durumda iken projenin formu üzerinde tıklama yaparak Table nesnesi forma eklenir.

Object Inspector penceresinde Table nesnesi ile ilgili olarak en başta Database Name özelliğinden yararlanarak Alias seçimi yapılır. Üzerinde işlem yapmak istediğiniz dosyayı hangi Alias’a dayandırarak hazırladıysanız o Aliası seçmeniz gerekir. Bir önceki bölümde DelphiBook adında Bir Alias hazırlanmış ve ADRES.DBF dosyasını bu Aliasa dayandırarak hazırlamıştım. Table nesnesinin Database Name özelliği ile Alias seçiminden sonra sıra veri tabanı dosyasını seçmeye gelir. Veri tabanı dosyası Table nesnesine ait TableName özelliğinden faydalanılarak Adres.DBF dosyası eklenir.


DatabaseName özelliği ile Alias , TableName özelliği ile veri tabanı dosyası seçimi yapıldıktan sonra sıra Table nesnesine ait Active özelliğne True değerini aktarmaya gelir. Böylece Table nesnesi ile ilgili olarak mutlaka yapılamsı gereken işlemler yapıldı. Ancak Delphi’de veri tabanı dosyaları üzerinde pratik bir şekilde işlem yapmak için Table kontrolü tek başına yeterli gelmiyor. Table kontrolüne yardımcı olması için Forma ayrıca DataSource kontrolünün de dahil edilmesi gerekir.
Ancak bu bölümde önce DataSource kontrolünden yararlanmadan veri tabanı dosyası üzerinde işlem yapacağım. Bu amaçla forma eklediğimiz Table nesnesinin üzerine sağ fare ile tıklayıp table nesnesi aracılığı açılan dosyanın üzerinde işlem yapmak istenen alanları için önceden bazı tanımlamalar yapılmak için Fields Editor komutunu verdim. Table nesnesinin adını içeren boş bir diyalog kutusu ekrana gelir.
Açılan bu diyalog kutusunun içinde iken sağ fare tuşuna basılıp Add fields komutu verilirse veri tabanı dosyasında hazırlanan alanlar eklenir.

Çalışma anında üzerinde bulunan kaydın SOYAD alanının içeriği Table1SOYAD nesnesinin Text özelliğinde, AD alanının içeriği ise Table1AD nesnesinin tex özelliğinde saklanır. Table nesnesini içeren forma sahip olan proje çalıştırılır çalıştırılmaz kayıt okuma kafası daha önce seçilen veri tabanı dosyasındaki ilk kaydın üzerine konumlanır. Şimdi örnek olması için çalışma üzerinde tıklama yapıldığı zaman işletilecek bir program satırını projedeki tek formun FormClick yordamına dahil edeceğim.
ShowMessage (Table1AD.Text);

Table nesnesi yardımı ile açılan ve her alanı için Fields Editor penceresinde tanımlama yapılan bu dosyadaki aktif kaydın bütün içeriğini ekrana getirmek için üzerinde çalıştığım projenin tek formuna 5 Label ve 5 Edit kutusu ilave ettim. Table1AD nesnesine ait text değişkeninin içeriği, Edit1 kutusuna Table1SOYAD nesnesine ait text değişkeninin içeriği Edit2 metin kutusuna ilave edilir.
Bu işlemler çalıştırılır çalıştırılmaz otomatik olarak yapılacağı için, bu işlemleri yapacak program satırlarını forma ait FormCreate yordamına yazdım.
begin
Edit1Text := Table1AD.Text;
Edit2Text := Table1SOYAD.Text;
Edit3Text := Table1ADRES.Text;
Edit4Text := Table1TEL.Text;
Edit5Text := Table1SEHIR.Text;
Proje çalıştırılır çalıştırılmaz aşağıdaki ekran görüntüsü elde edildi.