Функция Addr()

Возвращает адрес определённого объекта.

Объявление:

Function Addr(x) : Pointer ;

Режим:

Windows,  Protected,  Real

Замечание:

Параметр X - идентификатор переменной, процедуры и функции. Результат - указатель на X. Как и NIL, результат функции Addr совместим со всеми типами указателей.

Пример:

{Addr.PAS}
{ Пример программы для функции Addr } 
var P : Pointer;

Begin
    P:=Addr(P); { Указывает сам на себя !}
End.