Создание своего компонента, первые шаги

(1/1)

Hedgehog:
Пробую создать свой невизуальный компонент, наследник от TComponent. Задачи компонент решает очень простые, посредством метода, в котором передается два параметра, он их складывает и вызывает событие (ну типа сложение выполнено). Есть у компонента открытый метод Код
void __fastcall Sum(int A, int B) и свойство Код
__published:   __property TMyEvent OnAfterSum, где пользовательское событие определено как Код
typedef void __fastcall (__closure *TMyEvent)(System::TObject *Sender, int Result). Компонент компилируется, инсталлируется, создаю тестовую форму и кидаю на на неё свой компонент. Всё хорошо, у компонента видно свойство OnAfterSum. Но вот когда я два раза щелкаю по этому событию в редакторе кода получаю такое:
Код
void __fastcall TForm1::MyComp1AfterSum(TObject *param_0, int param_1)
{
  ;
}Вместо Sender - param_0, вместо Result - param_1.
Что нужно сделать чтобы было как я задумал?

Навигация

[0] Главная страница сообщений