P°φkaz HALT zp∙sobφ ukonΦenφ b∞hu programu (nebo vno°enΘho programu). ZapφÜe se prost∞:
Halt
Vno°en² program je procedura (konΦφ ... end;
) spuÜt∞nß nap°. tlaΦφtkem z formulß°e nebo vybrßnφm polo₧ky menu apod. Vno°en² program m∙₧e i nemusφ b²t spuÜt∞n za b∞hu hlavnφho programu (konΦφ ... end.
).
P°φkaz halt
je jedin² zp∙sob, jak p°eruÜit vykonßvßnφ posloupnosti akcφ vytvo°enou v nßvrhß°i formulß°∙
P°φklad1:
V ·vodu programu (hlavnφho) lze testovat dostatek prßv p°ihlßÜenΘho u₧ivatele, nejsou-li pot°ebnß prßva, pak je vhodnΘ skonΦit.
begin
...
if not TestPrav then Halt;
P°φklad2:
Ve formulß°i do prom∞nn²ch je tlaΦφtko OK s obvykl²m v²znamem. Posloupnost akcφ m∙₧e b²t nßsledujφcφ:
if not TestVybrano then halt; zrusitAkci :=false;
Zav°φt formulß° Novy_zaznam
Prvnφ akce provede test napln∞nφ. Zavolß proceduru TestVybrßno, kterß zkontroluje, je-li v²b∞r kompletnφ a pokud ne, ohlßsφ chybu (pomocφ funkce Info_box
) a vrßtφ FALSE. Tφm se zavolß p°φkaz halt
, kter² provßd∞nφ akcφ zastavφ (tedy formulß° se nezav°e).
Druh² °ßdek nastavφ hodnotu prom∞nnΘ a t°etφ °ßdek pomocφ standardnφ akce zav°e formulß°.
Viz takΘ: