Здравствуйте, Flamer, Вы писали:

F>[]

F>
DM>>А зачем в описании TTestEvent стоит __closure?

F>Потому, что в паскалевском объявлении функции указано

F>
F>

F>TTestEvent=procedure(text:WideString) of object
F>

F>А вообще, вот вам выдержка из хелпа про __closure:

F>
F>

F>The __closure keyword is used to declare a special type of pointer to a member function. Unlike a regular C++ member function pointer, a closure contains an object pointer.

F>То есть __closure — это такой специальный тип указателя, который указывает на функцию в экземпляре класса. Это расширение Borland.

Вот когда делаю без __closure и ф-ия Event не является членом класса, то работает а потом появляется ошибка (почти сразу). Т.е. она (Test) обращается к этой ф-ии Event, она срабатывает, а затем ошибка.

А если я делаю __closure и использую функцию член класса, то не работает вообще.