Section courante

A propos

Section administrative du site

DOSEXITCODE

Code de sortie DOS
Turbo Pascal 5+ DOS

Syntaxe

Function DosExitCode:Word;

Description

Cette fonction retourne le code de retour d'une instruction «EXEC».

Remarque

Exemple

Voici un exemple typique de l'utilisation de DosExitCode :

  1. Program DosExitCodeSamples;
  2.  
  3. {$M $4000,0,0 }   { Pilte de 16 Ko, pas de mémoire de tas }
  4.  
  5. Uses Dos;
  6.  
  7. Var
  8.  ProgramName,CmdLine:String;
  9.  
  10. BEGIN
  11.  Write('Programme à exécuter (chemin complet) : ');
  12.  ReadLn(ProgramName);
  13.  Write('Ligne de commande à passé au porgramme ',ProgramName, ' : ');
  14.  ReadLn(CmdLine);
  15.  WriteLn('A propos de Exec...');
  16.  SwapVectors;
  17.  Exec(ProgramName,CmdLine);
  18.  SwapVectors;
  19.  WriteLn('...retour dum Exec');
  20.  If DosError<>0 Then WriteLn('Erreur DOS #', DosError)
  21.                 Else WriteLn('Succès de Exec. ','Code de sortie du processus enfant = ',DosExitCode);
  22. END.

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 146 à 147.
Le grand livre du Turbo & Borland Pascal 7.0, Edition Micro Application, Reiner Scholles, 1993, ISBN: 2-86899-873-9, page 1224.

Dernière mise à jour : Dimanche, le 25 janvier 2015