Fonction qui retourne une adresse, comment faire ?

Bonjour,

Function RetourneAdresse(T : Liste) : Pointer;

Avec le mot réservé "pointer", la fonction retourne un type indéfini de pointeur, et il est tout aussi simple de retourner un pointeur typé, tel qu'ici:

PRec : ^Rec;
Rec  : record
  Int: Integer;
end;

Function RetourneAdresse(T : Liste) : PRec;

Certains types sont déjà retournés par la fonction sous forme de pointeurs, dès que celui-ci dépasse 4 octets.
De plus les types "var" tels que

Procedure ProcVar(Var Value : Rec);

reviennent exactement au même qu'un retour sous forme de pointeur, puisque la variable est passée par adresse et que celle-ci est donc directement influencée.

Le chêne aussi était un gland, avant d'être un chêne