Pascal/Costruttori e distruttori: differenze tra le versioni

Supponiamo di creare un oggetto che stampa su un ambiente testuale la famosa frase "Hello, world!". Inizializziamo l'oggetto con la posizione dove dovrà essere stampata la frase, e poi utilizziamo il metodo <code>Stampa</code> per stampare la frase.

 

USES crt;

TYPE HelloWorld= Object

readln;

END.

 

Il costruttore <code>Init</code> inizializza i campi <code>riga</code> e <code>colonna</code> secondo i parametri passati, <code>Stampa</code> sposta il cursore nel punto indicato dai campi <code>riga</code> e <code>colonna</code>, e stampa finalmente la frase.

Come esempio possiamo ancora considerare il precedente, definendo un distruttore che oltre a liberare le risorse e a cancellare l'istanza dell'oggetto, cancella la frase che era stata scritta nello schermo.

 

USES crt;

TYPE HelloWorld= Object

ReadLn;

END.

 

[[Categoria:Pascal]]