Здравствуйте, Dmitry_mit, Вы писали:
DM>Скажем есть процедура:
DM>procedure Test(s:WideString;int:integer;var TE:TTestEvent); stdcall; export;
DM>где TTestEvent — некоторая функция:
DM>TTestEvent=procedure(text:WideString) of object; stdcall;
DM>Так вот интересует, что передается в ф-ию Test (последний параметр), т.е. там написано — "var TE:TTestEvent" , что обозначает "var"? т.е. передается указатель на функцию типа TTestEvent?
Передаётся ссылка на функцию.
DM>Если можно, покажите как будет выглядеть эта функция на C++
typedef void __fastcall (__closure *TTestEvent)(WideString text);
extern "C" __declspec(dllexport) void _stdcall Test(WideString s,TTestEvent& TE)
{
}