--Bir çok durumda dallanma işlemlerinizi “if” ile gerçekleştireceksiniz. Fakat kodunuzun daha kolay anlaşılabilirliği (veya yazılması) açısından bazı durumlarda “case” yapısını kullanmanız uygun olacaktır.----
--Şunu hiç bir zaman unutmayın “case” yapısı ile gerçekleştireceğiniz tüm kodları 'if' yapısıyla yazabilirsiniz, ama tersi mümkün değildir. Yani if yapısıyla oluşturacağınız kodları“case” ile yazamayabilirsiniz.----
--“case” yapısının kullanım şekilleri ----
--“Case” yapısının davranışı şöyledir. Alternatifli değişkenin değerleri teker teker irdelenerek gerekli kodların işletilmesi sağlanır.------
--Şunu hiç bir zaman unutmayın “case” yapısı ile gerçekleştireceğiniz tüm kodları 'if' yapısıyla yazabilirsiniz, ama tersi mümkün değildir. Yani if yapısıyla oluşturacağınız kodları“case” ile yazamayabilirsiniz.----
--“case” yapısının kullanım şekilleri ----
Kod:
procedure TForm1.Button13Click(Sender: TObject);
var
sayi:integer;
begin
case sayi of
1:ShowMessage('Girdiğiniz Sayı1 dir');
2:ShowMessage('Girdiğiniz Sayı2 dir');
3:ShowMessage('Girdiğiniz Sayı3 dür');
4:ShowMessage('Girdiğiniz Sayı4 dür');
5:ShowMessage('Girdiğiniz Sayı5 dir');
else
ShowMessage('Girdiğiniz Sayı Yanlışdır');
end;
end;--“Case” yapısının davranışı şöyledir. Alternatifli değişkenin değerleri teker teker irdelenerek gerekli kodların işletilmesi sağlanır.------