4 Mayıs 2013 Cumartesi

Delphide şartsız dallanma komutu GOTO nun kullanımı

      Goto komutu programcının belirttiği yere, derleyicinin şartsız bir şekilde dallanmasını sağlar. Bu programcı için bir kolaylık olmasına rağmen kullanılması çok önerilmez. Ama tabi ki bazı durumlarda bu komutu bilmek ve uygulamak gerekir.
     Goto deyimi için öncelikle dallanma yeri belirtilmelidir. Dallanma yeri nasıl tanımlanır?

Label

dallanmayeri;

şeklinde tanımlanır.  Örnek bir kod yazalım.  GOTO deyimini sonsuz döngü olarak kullanalım. 
//***************************************************************************/
label
geridonus;
var
sayi:integer;
begin
sayi:=0;

geridonus:
sayi:=sayi+1;

goto geridonus;
//****************************************************************************/
program sonsuza kadar sayi degişkenini arttiracaktir. 

ÖNEMLİ NOT: Delphide sonsuz döngüler sırasında formumuz tabiri caizse kilitlenir. Sürüklenemez ve üzerindeki bir buton veya herhangi bir nesne tıklanamaz. Bunu şu komutla engelleyebiliriz. Bu komutu kullanılan döngü içine yazmalıyız.

//************************************
application.ProcessMessages;
//************************************

Artık programımız döngü içinde de olsa yapılan buton tıklamaları, form sürükleme vs. gibi işlemlere cevap verecektir. 






Hiç yorum yok:

Yorum Gönder