Langage de programmation - Turbo Pascal - Référence de procédures et de fonctions

MSDOS	MS-DOS
Turbo Pascal 3+	DOS, WinDos

Syntaxe

Procedure MsDos(registres:Registers);

Paramètres

Nom	Description
registres	Ce paramètre indique la valeur des registres à envoyer comme appel à l'interruption 21h

Description

Cette procédure permet d'appeler l'interruption du système d'exploitation DOS: 21h.

Remarques

L'effet d'un appel à MsDos est identique à un appel à Intr avec un Numéro de $21. Le type de données Registers est un enregistrement déclaré dans l'unité DOS :



Type Registers=Record Case Integer of

 0:(AX,BX,CX,DX,BP,SI,DI,DS,ES,Flags:Word);

 1:(AL,AH,BL,BH,CL,CH,DL,DH: Byte);

End;

Les interruptions logicielles dépendant d'appels spécifiques dans SP ou SS à l'entrée ou la modification de SP et SS à la sortie ne peuvent pas être exécutées à l'aide de cette procédure.

Exemple

L'exemple suivant permet de demander la code de page, soit, la fonction 66h, sous-fonction 01h de l'interruption 21h (l'équivalent de la commande CHCP) :



Program MSDOSSamples;

 
Uses DOS;

 
Var

 Regs:Registers;

 
BEGIN

 Regs.AX:=$6601;

 MsDos(Regs);

 If(Regs.Flags and FCarry=FCarry)Then WriteLn('Page de code active inconnu')

                                 Else WriteLn('Page de code active : ',Regs.BX);

END.

Voir également

Langage de programmation - Assembleur 80x86 - Interruption 21h: Service d'interruption DOS

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 296.

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

Section courante

A propos

Section administrative du site

MSDOS