Section courante

A propos

Section administrative du site

CSEG

 Segment de code
QuickPascal System

Syntaxe

Function CSeg:Word;

Description

Cette fonction retourne le registre du segment de code.

Remarque

Exemple

Voici un exemple de l'utilisation de cette fonction :

  1. Program CSegSamples;
  2.  
  3. Procedure A;Begin
  4.  WriteLn('Segment de A = ',Seg(A));
  5. End;
  6.  
  7. Procedure B;Begin
  8.  WriteLn('Segment de B = ',Seg(B));
  9. End;
  10.  
  11. BEGIN
  12.  A;
  13.  B;
  14.  WriteLn('Segment de Code = ',CSeg);
  15. END.

on obtiendra un résultat semblable au suivant :

Segment de A = 27342
Segment de B = 27342
Segment de Code = 27342

Dernière mise à jour : Vendredi, le 13 février 2015