Halt: Porovnání verzí

Z Delphi & Pascal (česká wiki)
Skočit na navigaci Skočit na vyhledávání
 
Řádek 25: Řádek 25:
 
  {Halt.PAS}
 
  {Halt.PAS}
 
  {Vzorový příklad pro proceduru Halt.}
 
  {Vzorový příklad pro proceduru Halt.}
 +
 
  { Pro Windows: }
 
  { Pro Windows: }
 
  { uses WinCrt; }
 
  { uses WinCrt; }
 +
 
   begin
 
   begin
 
     if 1 = 1 then
 
     if 1 = 1 then

Aktuální verze z 21. 1. 2014, 12:17

Zastaví provádění programu a vrátí řízení operačnímu systému.

Deklarace
 procedure Halt [ ( Exitcode: Word ) ];

kde:

ExitCode je nepovinný výstupní kód programu
Režim
Windows, Reálný, Chráněný
Poznámky
Iniciuje vykonání případných procedur Exit. ExitCode může být testován rodičovským procesem pomocí DosExitCode v jednotce Dos, nebo pomocí testu ERRORLEVEL v dávkovém souboru DOSu.
Viz také
Exit
DosExitCode
RunError


Vzorový příklad

{Halt.PAS}
{Vzorový příklad pro proceduru Halt.}

{ Pro Windows: }
{ uses WinCrt; }

 begin
   if 1 = 1 then
     begin
       if 2 = 2 then
         begin
           if 3 = 3 then
             begin
               Halt(1); { Tady a nikde jinde! }
             end;
         end;
     end;
   Writeln('Tohle se nevykoná.');
 end.