Процедура/функция обратного вызова в классе

[evg_m]

var  x: integer;

procedure callback(const s: string);

область видимости имен объявленныx в
interface везде
implementation в пределах uint
procedure ... в пределах данной процедуры

переменные процедуры размещены в стеке и "живут"(имеют адреса) исключительно во время ЕЕ выполнения.
код процедуры размещен постоянно и доступен в любое время (если у вас есть ее адрес), а узнать адрес можно только во время выполнения процедурЫ где данная процедура видна(известно ее имя).

процедурЫ где данная процедура

Здесь речь про ДВЕ разные процедуры, вторая есть ЛОКАЛЬНАЯ процедура. (также как локальная переменная, НО... есть отличия читай выше)

[ResourceSpace]

В общем Делфи7 не поддерживает подобные статик-функции.

Нашёл, вроде похожее: http://www.gunsmoker.ru/2015/05/task-18-answer.html

Попробуйте скомпилировать этот код для x64. В отличие от кода x32, который для доступа к переменным просто смещается по стеку на заранее известное смещение от собственных локальных переменных, код x64 иначе производит доступ к локальным переменным ...

Nested procedures and functions (routines declared within other routines) cannot be used as procedural values, nor can predefined procedures and functions.
Не используйте локальные подпрограммы в качестве callback-ов.

[JUDAS]

Если не сложно, можете объяснить, как такое вложение функций называется, и почему для этого не нужно писать var перед _PROC?

Автор, ты ответил на свой вопрос - это вложенные функции.
Объявление вложенных функций возможно только а синтаксисе Делфи. К сожалению "братский" язык программирования не поддерживает такую возможность.
Свойство вложенных функций:
1. Как правильно заметил ResourceSpace они не принадлежат ни классу ни объекту. Это как бы автономные программные вставки... которыми я очень часто пользуюсь
2. Вложенные функции отличаются от обычных тем, что они "закрыты" для доступа извне, включая секцию implementation текущего файла

п.с. одного не понимаю, зачем нужен вызов такой функции ?

[Krasiosoft]

Спасибо всем, кто помогал.

Сообщение от JUDAS

п.с. одного не понимаю, зачем нужен вызов такой функции ?

Чтоб к ней не было доступа извне, и она находилась как бы в классе. Жаль, что Delphi 7 не поддерживает статик функций, тогда это можно было бы сделать нормально.