DosExitCode

Vrací výstupní kód podprocesu.

Deklarace

function DosExitCode: Word;

Režim

Reálný, Chráněný

Poznámky

Nižší bajt je kód, odeslaný končícím procesem.

Vyšší bajt je nastaven na:

Typ Ukončení	Vyšší Bajt
Normální	0
Ctrl-C	1
Chyba zařízení	2
procedura Keep	3

Viz také

Exec

Keep

Vzorový příklad

 { DOSXCODE.PAS }
 { Vzorový příklad pro DosExitCode a Exec }
 {$M $4000,0,0 }   { 16K zásobník, žádná halda }
 uses Dos;
 var
   ProgramName, CmdLine: string;
 begin
   Write('Program (úplná cesta): ');
   ReadLn(ProgramName);
   Write('Příkazový řádek programu ', ProgramName, ': ');
   ReadLn(CmdLine);
   WriteLn('Do Exec...');

   SwapVectors;
   Exec(ProgramName, CmdLine);
   SwapVectors;

   WriteLn('...zpět z Exec');
   if DosError <> 0 then{ Chyba? }
     WriteLn('Chyba DOSu #', DosError)
   else
     WriteLn('Exec úspěšný. ', 'Výstupní kód synovského procesu = ', DosExitCode);
 end.