Bir değişkenin aldığı bir cok değere gore ayrı komutların calıştırılması gereken durumlarda
Case dongusu kullanılır. Genel yapısı aşağıdaki gibidir.

Kod:
Case değişken of durum1 : Komutlar ; durum2 : Komutlar ; ...... durumn : komutlar ; Else komutlar ; end;
Yukarda dikkat edilirse değişken; durumlara uyan değerler aldığı zaman ilgili komutlar calışacak
eğer değişkenin değeri hicbirine uymuyorsa Else' den sonraki komut calışacaktır.
Aşağıdaki orneği inceleyelim.
Kod:
Case x of 1 : label1.Caption := ' Delphi-5 ' ; 2 : label1.Caption := ' Delphi-2005 ' ; 3 : Edit1.Text := ' www.forumtrportal.com ' ; else Edit1.Text := ' Borland Delphi ' ; end;

__________________