A.1 Distinct Cümleciği

Kelime manası ayrı ,hariç,tek demektir. Deyim olarak aynı alandaki benzersiz olanları bulmayı ifade eder.
Aşağıdaki örnek şehir alanı ne olursa olsun tüm öğrencileri gösterir
Select ogr_sehir From Ogrenci

Aşağıdaki örnek ise sehirleri aynı oln öğrencilerin yalnız ilkini seçer.
Select DISTINCT ogr_sehir From Ogrenci


A.2 From Cümleciği

From cümleciği verinin getirileceği tablo veya tabloları belirtir . Tablo referansı tek bir tablo ,tabloların virgülle ayrıldığı bir liste veya iç/dış birleştirme (SQL -92 standartında belirtilen ) olabilir . Örneğin aşağıdaki ifade tek bir tabloyu çağırır :
Select ogr_ad,ogr_soyad From "Ogrenci.dbf"

Aşağıdaki ifade bir sol dış birleştirmesini gösteren tablo referansına bir örnektir.
Select From Parca left Outer join İthalat On Parca.Parca_no=Ithalat.Parca_no


A.3 Where Cümleciği

İsteğe bağlı olarak kullanılan Where cümleciği arama durumunda belirtilen kriterlere uyan kayıtların alınmasını böylece filtreleme yapılmasını sağlar.
Örneğin aşağıdaki ifade sadece Parca_nosu 543' den büyük olan satırları çağırır.
Select From Parca Where Parca_no>543

Where cümleciği IN yüklemini de içerebilir. IN yüklemi parantez ,içinde değerler listesini içerir. Örneğin aşağıdaki ifade sadece Parca_no 'su IN yüklem listesindeki öğelere eşit olan satırları çağırır.
Select From Parca Where Parca_no IN (543,544,650,680)
Select from Dersler Where bol_kod='12' and ogr_sinif='4'
Where cümleciğinde karşılaştırma için > ,<,=, <> gibi operatörler kullanılabilir. Bunun yanı sıra IN , ANY , ALL , EXIST yüklemleri de kullanılabilir

A.4 Order By

Order By cümleciği çağrılan satırların sırasını belirtir.
Örneğin aşağıdaki sorgu öğrenci ismine göre alfabetik(artan) sıralı olarak bütün öğrencilerin listesini verir
Select From Ogrenci Order By ogr_no ASC
aşağıdaki sorgu öğrenci soyadına göre alfabetik(azalan) sıralı olarak bütün öğrencilerin listesini verir.
Select From Ogrenci Order By ogr_soyad DESC

Hesaplanmış alanlar korelasyon( ilişki) ismine veya sıra durumuna göre sıralanabilir. Örneğin aşağıdaki sorguda ad ile soyad alanı birleştirilerek oluşturulan alana göre sıralanarak kayıtlar ekrana çağrılır.
Select soyad || ',' ad || as tam_ad ,telefon From müsteri Order by tam_ad

A.5 Group By

Group By cümleciği toplam fonksiyonları için çağrılan satırların nasıl gruplandırılacağını belirler.

Örnek:
Select Parca_no, Sum(miktar) as Toplam
From Parca
Group By Parca_no

A.6 Having

Having cümleciği kaydın sorguca belirlenen değerlere sahip olup olmadığına bakar. Group By ile birlikte kullanılır. Having cümleciğiyle denkleşmeyen gruplar sonuç kümesinden çıkarılırlar. Alt sorgular Having cümleciğince desteklenirler.

Alt sorgu ,ana sorguca döndürülecek kayıtların sayısını sınırlayan arama koşullarıdır. =,<,> gibi koşullandırmalar yanında IN ,ANY ,ALL, EXIST gibi ön yüklemler de kullanılabilir.

Bölümlere göre öğrenci sayıları 500 kişinin üstünde olan bölüm kodlarının listesini veren bir örnek aşağıdadır.
Select DISTINCT ogr_bol_kod, COUNT() From Ogrenci Group By ogr_bol_kod Having COUNT ()>500

A.7 Union

Union cümleciği iki veya daha fazla Select ifadesinin sonucundan tek bir tablo üretmek için kullanılır.
Örneğin :
Select From Ogrenci UNION Select From Veli

A.8 İntersect

Sorgulardan elde edilen ortak kayıtları verir.
Select From Ogrenci INTERSECT Select From Veli

A.9 Minus

Birinci sorguda bulunup ikinci sorguda bulunmayan kayıtların bulunmasında kullanılır.Diğer bir şekilde bir grup öğenin seçimden çıkarılması amacıyla kullanılır.
Select Ogr_num From Ogrenci MINUS (Select ali_ogr_num, From alınandersler)

A.10 Heterojen Birleşmeler

Local SQL farklı veri tabanlarındaki tabloların birleştirilmesini destekler. Heterojen birleştirme yapılacağı zaman yerel bir takma ad seçebilirsiniz. Takma ad seçmek için SQL/SELECT ALIAS 'ı seçin. Eğer Alias seçmezsen Local SQL tabloyu kullanılan veri tabanının olduğu aktif dizinde bulmaya çalışacaktır.
Örneğin ISLER Alias 'ı fonksiyonda geçen veri tabanı idaresi olabilir.
Yerel bir Alias seçtikten sonra bir tablo ismi belirtirsek

• Yerel tablolar için hem Alias' ı hem yolu belirtin
• Tabloları uzaktan kontrol için sadece Alias' ı belirtin

Aşağıdaki ifade Paradox tablosundan ve Dbase tablosundan veri getirir.
Select Distinct M.Müs_no,M.Sehir,S.Siparis_no From "MUSTERI.DB" M , "SIPARIS.DBF" Select Where M.Müs_no= S.Müs_no

a) Drop Table ( Tablo Silme)

Eğer tablo ismi , karakter periyodu içeriyorsa, ismi çift tırnak içinde gösteriniz.
Drop Table "C:\Data\Customer.Db"
Eğer tablo ismi , karakter periyodu içermiyorsa, ismi çift tırnak içinde göstermeyin. Drop table clients

NOT: Query1.Open yazılmamış olması gerekiyor.

b) CREATE INDEX

Create Index Insoyad On Tez9[Soyad]
Create Index Parca On Parcalar (Part_No)
Create Index Pers_maas On personel(brüt)

Paradox : Paradox birincil indexleri yalnızca tablo oluşturulurken oluşturulabilir. İkincil indexler büyük harf duyarsız korunduğunda mümkünse oluşturulur.

Dbase : Dbase indexleri belirtildiği gibi oluşturulur. Index ismi tag ismidir

c) DROP INDEX

Index silerken Tablo_ Ismi.Index_ Ismi şeklinde bir yazılım kullanırız.
Drop index.part_no
Drop index.primary
Drop tez9.insoyad

Aşağıdaki cümlecikler :
Select From, Where ,Order By, Group by ve Having
Aşağıdaki toplamlar
SUM , AVG , MIN , MAX , COUNT ve
Aşağıdaki operatörler
, , / , =, <> , is NULL
UPDATE , INSERT , DELETE tarafından desteklenen operatör ve cümleciklerdir.
Aşağıdaki örnekler standart veri tabanlarıyla kullanılan DML ifadelerine birer örnektir.

1. Örnek
UPDATE
Update Esya
Set sehir=' Erzurum'
Where esya.sehir='Aydın'
Sehir adı 'Aydın' olan kayıtların sehir adı alanlarını 'Erzurum' ile değiştirir.

2. Örnek
INSERT
Insert into Esya(parca_no,sehir)
Values ('aa090','Ankara')
Parca ve Sehir alanlarına bu değerleri ekler

3. Örnek
DELETE
Delete From Esya
Where parca_no='aa090'
Parca_nosu 'aa090' olan kayıtları siler

4. Örnek
Birleştirmek için SELECT
Aşağıdaki örnek SELECT ifadesinin nasıl JOIN olarak kullanıldığını gösteriyor
Select Distinct P.parca_no, P.miktar, E.sehir
From Parca P ,Esya E
Where p.parca_no=E.parca_no
And P.miktar>20
Order by P.miktar, E.sehir, P.parca_no

Birleştirme amacıyla kullanılan bir SELECT ifadesi WHERE cümleciğini içermelidir ki en azından bir alanın her iki tabloda da eşit olduğunu kontrol edebilsin.

5. Örnek Alt Seçimler
Select P.parca_no from Parca P
Where P.miktar In
( Select I.miktar from Ithalat I
Where I.parca_no='aa090')

Parca.Db 'deki miktar alanı ithalattaki parca_nosu aa93 olan kayıtlardaki miktarların birine eşit olan parca.dbf deki kayıtların parca_no' larını alır.

6. Örnek Group By
Select parca_no , Sum (miktar) as PQTY
From Parca
Group by parca_no

NOT : Select cümleciklerindeki Toplam alanları eğer hesaplanan alan kullanıldıysa Group By cümleciği kullanılmalıdır.

7. Örnek Order By
Aşağıdaki örnek azalan tipteki cümlecikte kullanılan Order By 'a bir örnektir.
Select Distinct musteri_no
From
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
\data\musteri
Order by musteri_no Descending
NOT : Ascending= artan Descending = azalan

Table1.Active := False;
try
{ Ilk önce alias kullanmaya çalışıyoruz }
Table1.DatabaseName := 'Delphi_Demos';
Table1.Active := True;
except on EDatabaseError do
{ Eğer hata oluşursa sürücü ve dizin belirtiyoruz }
Table1.DatabaseName := '
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
\delphi\demos\database';
Table1.Active := True;
end;

• Daha az iş ve daha kısa iş zamanı
• Network trafiğini minimize etmek

• Kullanıcılar verinin yerel kopyasını düzeltirken ,başka uygulamalar server üzerindeki gerçek veriye erişebilir ve bunu değiştirebilir.
• Başka uygulamalar uygulamaca yapılan değişikliklere cache'teki bilgi-ler veri tabanına uygulanana kadar veri değişikliklerine ulaşamazlar.

procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
with ProgressBar1 do
begin
Min := 0;
Max := Table1.RecordCount;
Table1.First;
for i := Min to Max do
begin
Position := i;
Table1.Next;
end;
end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Query1.open;
Label2.caption:=inttostr(query1.recordcount);
Label4.caption:=inttostr(query1.recno);
Label6.caption:=ittostr(query1.recordsize);
Label8.caption:=inttostr(query1.keysize);
end;

Değer Anlamı
rtModified değiştirilen kayıtlar görünür
rtInserted eklenen kayıtlar görünür
rtDeleted silinen kayıtlar görünür
RtUnmodified değiştirilmemiş kayıtlar görünür

• BeforeOpen olay çağrısını yapar.
• Dataset State özelliğini dsBrowse 'a ayarlar.
• Tablo içinde bir kursör ayarlar.
• Eğer tanımlandıysa AfterOpen olayını çalıştırır.

• Tablo açık olduğunda
• Tablo dsEdit durumunda olduğunda
• Veriden -etkilenen ızgara (grid) kontrollerinde ki ( Aktiflik bir görsel kontrolden diğerine veya bir sütundan diğerine hareket eder) ve değişikliklerin kayda yapıldığı durumlarda
• Veri tabanından bir kayıt çağrıldığında

• Tablo açılır,
• Tablo için First metodu çağrılırsa ,
• Tablo için Prior (önceki) metodu çağrılır ve bu işlem başarısız olursa (çünkü kursör zaten ilk kayıttadır)
• Boş bir kayıtta veya dizide SetRange metodu çağrılırsa.

• Boş bir tablo açıldığında,
• Tablonun Last metodu çağrıldığında,
• Tablonun Next metodu çağrıldığında ve bu işlem başarısız olduğunda
• Boş bir dizi veya tablo üzerinde SetRange çağrıldığında ,

Aşağıdaki örnek yeni bir tablonun nasıl oluşturulduğunu gösterir

with Table1 do
begin
Active := False; { Table öğesi aktif olmalıdır }

{ İlk önce table tipini belirle ve buna bir isim ver}
DatabaseName := 'DBDEMOS';
TableType := ttParadox;
TableName := 'CustInfo';

{ Tablodaki alanları tarif et}
with FieldDefs do
begin
Clear;
Add('Field1', ftInteger, 0, True);
Add('Field2', ftString, 30, False);
end;

{ Indexleri tanımla }
with IndexDefs do
begin
Clear; { İlk indexin ismi yok çünkü bu Paradox primary key dir }
Add('', 'Field1', [ixPrimary, ixUnique]);
Add('Fld2Indx', 'Field2', [ixCaseInsensitive]);
end; { Özellklerini belirlediğimiz tabloyu oluşturalım }
CreateTable;
end;

Alanlara Fields özelliği ile ulaşmak aşağıdaki uygulamalar için kullanışlıdır:
• Tablodaki bazı veya tüm alanlarda dolaşmak için
• Çalışma anında yapıları bilinmeyen altı çizili tablolar için

Değer Anlamı
dsInactive Tablo kapalı,yani kullanılamaz
dsBrowse Data görülebilir ama değiştirilemez. Bu açık tablonun varsayılan durumudur
dsEdit Aktif kayıt değiştirilebilir.
dsInsert Yeni bir kayıt eklenebilir.
dsCalcFields OnCalcFields olayı işlemektedir .Hesaplanmamış alanlar düzeltilemez ve yeni kayıtlar eklenemez.
dsFilter OnfilterRecord olayı aktifse Hesaplanmamış a lanlar düzeltilemez ve yeni kayıtlar eklenemez.
dsNewValue Tfield.NewValue özelliğine erişildiğini belirtmek için geçici durum dahili olarak kullanılır.
dsOldValue Tfield.Old.Value özelliğine erişildiğini belirtmek için Geçici durum dahili olarak kullanılır.
dsCurValue Tfield.Cur.Value özelliğine erişildiğini belirtmek için geçici durum dahili olarak kullanılır.
dsSetkey Yalnızca Ttable .Kayıt aramak mümkün veya SetRange işlemi yapılabilir. Sınırlı veri kümesi görülebilir ama kayıt eklenemez veya düzeltilemez.

BAYRAK Nesne durumu
csAncestor csDesigning aktifse ve nesne bir ata formunda tanıtıldıysa kullanın
csDesigning Nesnenin Form Designerca işlenmekte olduğu durumdur CsDestroying nesnenin değiştirilmekte olduğu
csLoading Filer nesnesinden yükleniyor.
csReading Özelliklerini akışından okuyorsa
csUpdating Değişiklikleri ata forma yansıtmak için nesne güncelleniyorsa. Bu csAncestor aktif edildiyse aktif edilir.
csWriting Özellik değerlerini akışa yazıyorsa
csFixups Daha yüklenmemiş başka bir formdaki nesneye bağlantı yapıldıysa .Bu özellik bütün kararlaştırılmış fixuplar yeniden çözüldüğünde sıfırlanır.

Örnek : Cachelenmiş güncellemeler enable olduğunda silinen kayıtları kurtarmayı gösteren bir örnek program.
procedure UndeleteAll(DataSet: TDataSet);
begin
with DataSet do
begin
UpdateRecordTypes := [rtDeleted]; {sadece silinen kayıtlar görünür olacak }
try
First;
while not EOF do
begin
RevertRecord; {aktif kaydı kurtar}
Next;
end;
finally
UpdateRecordTypes := [rtModified, rtInserted, rtUnmodified];
end;
end;
end;

a) İndekslenmiş paradox ve dbase tabloları için kayıt , dizinine dayanılan
konumda tablo içine eklenir .
b) Indekslenmemiş paradoxu ve dbase tabloları İçin , kayıt , tablonun sonu-na eklenilir .
c) Sql veri tabanları için , eklemenin fiziksel yerleşimi özel yapılır.
d) İndekslenmiş tablolar için , dizin , yeni kayıt bilgisi ile güncelleştirilir .

Örnek:
Procedure TForm1.Button1Click(Sender: TObject);
var
Stream1, Stream2 : TBlobStream;
begin
Stream1 := TBlobStream.Create(Table1Notes, bmRead);
try
Table2.Edit;
{ Aşağıda bloab akışı oluşturmanın diğer bir yolu }
Stream2 := Table2.CreateBlobStream(Table2.FieldByName('Remark s'),
bmReadWrite);
try
Stream2.CopyFrom(Stream1, Stream1.Size);
Table2.Post;
finally
Stream2.Free;
end;
finally
Stream1.Free;
end;
end;