BREAK : For,While veya Repeat döngülerinden birinde döngüden çıkmak için kullanılır.Örnek verelim hemen;
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;
Oguzz
oguz@thecoders.net
30 Temmuz 2007 11:24