Tweet

Ana Sayfa   Forum   Delphi
Yeni Başlık Cevap Ekle
white_bullet Döngü Kontrol İfadeleri (25/07/2008 05:33)
profil Oguzz
 offline OFFLINE
 Senior Coder

S.a önceki konuda en son Repeat-Until döngüsünü anlatmıştım.Şİmdi DÖngü Kontrol İfadelerinden dilimin
döndüğü kadar anlatmaya çalışıcam.

Bazı durumlarda döngü bitmeden döngüden çıkmak isteriz.Böle bir durumda birazdan bahsedeceğim kontrol deyimlerini kullanıcaz.En tanınmış döngü kontrol ifadelerinden olan Break ve Coninue üzerinde duralım..

BREAK :
For,While veya Repeat döngülerinden birinde döngüden çıkmak için kullanılır.Örnek verelim hemen;

CODE:

prucedure TForm1.Button1.CLick (Sender:TObject);
Var
i : array [1..20] of string;
k : integer;
begin
for i;=1 to 20 do
if i[k]='TheCoders' then begin
break;
if>50 then begin
ShowMessages('Aranan kayıdı bulamadık.Tekrar deneyin lütfen...');
end
else
ShowMessages(Inttostr(k)+'.kisi');
end;
end;


Vermiş olduğum örneği biraz incelerseniz önceki verdiğim derslerle birleştirip daha iyi anlarsınız.Tek başına verdiğimbir dersdeki örneği anlamaya çalışmayın önceki derslerde anlattığım terimleri ve komutları kullanıyorum onları incelemenizde fayda var.

Şİmdide COntinue İfadesine geçelim

CONTİNUE :
For,While veya Repeat döngülerinde bazı şartlar gerçekleştiğinde döngünün sonuna gitmeden tekrar başa dönmesini sağlar.

Örnekle daha iyi anlayacaksını;

CODE:
Var
i : integer;
Begin
for i=1 to 20 do
if i<10
Continue;
end;
ShowMessages(Inttostr(i));
end;


EXİT :
Program bloğundan,bloğun sonuna gitmeden çıkmayı gerçekleştirir.

Örnek;


CODE:
Var i; integer;
begin
i:=strtoint(Edit1.Text);
if i<10 then begin
exit;
end
else
Edit1.Text:='i 'nin değerleri 10'dan büyük!;
end;
end;
Halt


Not: Buradaki Halt ifadesi programdan çıkışı sağlar.


WHİT-DO


Herhangi bir kontrol elemanının birden fazla özelliğini değiştirmek için ya da metodlara ulaşmak için kullanılmaktadır.Kullanım şeklini aşağıda veriyorum..

CODE:
With kontroladi do
begin
....
end;


İşte bu kadar.Döngü kontrol ifadelerinden bahsettik Bir dahaki dersde Delphi'de Veri Tabanı'na giriş yapıcam.Herkeze kolay gelsin.Bu anlattıklarımı uygulayarak yaparsanız kodların ne işe yaradığını daha iyi anlar ve sizde türetebilrsiniz.

just code it!

Üye Profili
 
1 /
 
Ana Sayfa   Forum   Delphi
Yeni Başlık Cevap Ekle
 

MENÜ » FORUM
Menü » Takip et
RSS Facebook Twitter Friendfeed
Sık Kullanılanlar Google Yahoo Live
Menü » Paylaş
E-Posta ile gönder Twitter Facebook Friendfeed
Buzz Stumbleupon Delicious Digg