MethodAddress 함수 써보신분 계신가요?

TObject의 MethodAddress  메소드는 반환값이  void* 입니다.
VCL에 객체멤버함수의 포인터인 8Byte가 아니라
win32시스템에 기본형인 4Byte짜리 void * 인것입니다.

void *로 받아서 형변환해서 함수 호출하면
객체 내부에서 호출되는것이 아니라 이상하게 호출됩니다.

아래코드에서 Button2Click 과 Button3Click 을 하면 어떻게 나타날가요?

Button2Click 하면 "Form2"가 ShowMessage되고
Button3Click 하면 "Button3"가 ShowMessage됩니다. 이런 황당한...

단지 호출할때 Sender를  Form2와 Button3로 다르게 넘겨준것인데...

왜그런거죠?
1. 왜 Button1Click 함수내에서 Sender가 this가 되버린거죠?
2. 왜 MethodAddress 는 Published만 찾을수 있는거죠?  ( 그렇게 만들어 놓았기때문이라는 답변 말구요)
   String으로 객체멤버함수를 찾을수는 없는건가요? 그렇다면 왜 그런지요?

누가 MethodAddress에 대해 좀 자세히 가르쳐 주세요

FieldAddress 도 같은 원리인것 같은데 같이 설명좀...


[MethodAddress 사용예]

void __fastcall TForm2::Button1Click(TObject *Sender)
{
    ShowMessage(this->Caption);
}
//---------------------------------------------------------------------------
typedef void __fastcall ( *TObjectEvent)(System::TObject* Sender);
void __fastcall TForm2::Button2Click(TObject *Sender)
{
    TObjectEvent BtnClick;
    void *tt=MethodAddress(this->ClassType(), "Button1Click"); //or  MethodAddress( "Button1Click");
    BtnClick=(TObjectEvent)tt;
    if(BtnClick)BtnClick(this);
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button3Click(TObject *Sender)
{
    TObjectEvent BtnClick;
    void *tt=MethodAddress(this->ClassType(), "Button1Click");// or  MethodAddress( "Button1Click");
    BtnClick=(TObjectEvent)tt;

    if(BtnClick)BtnClick(Sender);
}
//---------------------------------------------------------------------------

미리 감사드립니다.