W petli...

Witam
To chyba juz bylo ale nie wiem gdzie...
Program dziala na tej zasadzie ze cala praca jest wykonywana w petli. Jak sprawdzic (np po zakonczeniu cyklu) czy uzytkownik nie nacisna przycisku 'KONIEC', i czy nie nalezy przerwac petli?

Sprawdzaj, czy program nie dostal komunikatu np. WM_CLOSE, jesli dostal to go zamknij.

No tak...
Tylko ze ja nie chce go zamykac:( tylko zakonczyc petle...
a teraz glupie pytanie:
Jak sprawdzic czy program dostal ten komunikat?

Pętle przyrywasz za pomocą

break

.

Nie jest problemem wyjscie z petli tylko wykrycie momentu, w ktorym nalezy nalezy to zrobic...

zmienna globalna:
var Klikniety : boolean;

Button - OnClick:
Klikniety:=True;

Przed petla:
Klikniety:=False;

W petli:
If Klikniety then Break;

Niestety to rozwiazanie tu nie zadziala:(
Poniewaz moja petla zostala uruchomiona w zdarzeniu OnClick,
to zadne inne zdarzenie nie zostanie zarejestrowane <ort>dopuki</ort> sie nie skonczy obsluga tego zdarzenia.

Wydaje mi sie ze trzebaby robic jakies przerwy na to aby mogly do programu dotrzec rozne komunikaty o innych zdarzeniach (np Nacisniecie innego przycisku).
TYLKO JAK TO ZROBIC???

w pętli dodaj

application.ProcessMessages ;

i na czas działania pętli wyłącz przycisk uruchamiający ją.