Accueil        Lexique        UNITéS        Algorithmes        Tutoriel   

Les unités de Pure Pascal (langage Pascal pour les ordinateurs de la gamme Atari ST), compatible Turbo Pascal.

Unité System : Procédure Dispose

Déclaration

procedure Dispose( var p : Pointer [, Done : Destructor ])

Description

La procédure Dispose libère la zone mémoire référencée par le pointeur p. Cela doit avoir été demandé au préalable via New, sinon vous obtiendrez une erreur d'exécution . La valeur de la variable pointeur p est détruite. Un autre accès à la zone de mémoire n'est plus autorisé. Si p pointe vers un type d'objet, un destructeur peut être passé comme paramètre supplémentaire fait pour l'objet. Les appels alternés de Dispose et FreeMem avec Mark and Release ne sont autorisés que dans une mesure limitée afin de ne pas confondre la gestion de la mémoire.

Références croisées FreeMem GetMem Mark New Release

Exemple

type
  CharacterPtr = ^Character;
  Character = record
    next : CharacterPtr;
    prev : CharacterPtr;
    c    : Char;
  end;
var
  t : String;
  p, n : CharacterPtr;
  i : Integer;
begin
  Write( 'Saisissez le texte: ' );
  Readln( t );
  p := NIL;
  for i := 0 to Integer(t[0]) do
  begin
    New( n );
    n^.prev := p;
    n^.next := NIL;
    n^.c := t[i];
    if p <> NIL then
      p^.next := n;
    p := n;
  end;
  while p <> NIL do
  begin
    Write( p^.c );
    n := p^.prev;
    Dispose( p );
    p := n;
  end;
end.

Vous trouverez dans cette zone la liste de toutes les Unités (équivalent des "Librairies" en C) de Pure Pascal. Les Unités indiqués comme standards existent dans la majorité des compilateurs Pascal existant sur ordinateurs 16 bits et au dela (dont Turbo Pascal 3 mini). Les unités indiqués comme Atari sont spécifiques aux systèmes d'exploitation des Atari ST (TOS n.n).

Accès aux unités

Les menus déroulants de chaque unité sont des accès directs aux procédures et fonctions, classés alphabétiquement (sans tenir compte de la casse, puisque le langage Pascal ne tient pas compte de la casse!)
CRT (Standard)

DOS (Standard)

GEM : AES (Atari)

GEM : VDI (Atari)

Graph (Standard)

Overlay (Standard)

Printer Strings (Standard)

System (Standard)

TOS : BIOS (Atari)

TOS : GEMDOS (Atari)

TOS : XBIOS (Atari)

Cette page Unités est issu du fichier UNIT.HLP de la documentation de Pure Pascal (d'Application Systems Heidelberg), qui a été convertie en format TXT puis traduite de l'Allemand grâce à Google Translator : des milliers de copier/coller de et vers Google translator ont été nécessaires, ne connaissant pas un mot d'Allemand!


Copyright © 2021 par Albatros Concept (Bruno Aubin)