Назначение
Возвращает значение (адрес), уникально идентифицирующее экземпляр объекта.
Описание
function GetAddr (var address : comp) : word;
Параметры
address : comp - адрес.
Возвращаемое значение
Код ошибки (tsOk, tsNoPosition, tsInternalError).
