TPopupMenu에 PopupComponent 라는게 있네요

이놈을 어디다가 쓰냐구요?

PopupMenu 가 여러 컨트롤에 연결되어있을경우
어느 컨트롤에서 팝업메뉴가 띄워졌는지 확인하고자 할때 쓸 수 있습니다.

예를 들어 아래와 같이 Edit 에 popupmenu가 연결되었을때..

void __fastcall TForm1::FormCreate(TObject *Sender)
{
    Edit1->PopupMenu = PopupMenu1;
    Edit2->PopupMenu = PopupMenu1;
    Edit3->PopupMenu = PopupMenu1;
}
void __fastcall TForm1::Pm_ClearClick(TObject *Sender)
{
    String str=PopupMenu1->PopupComponent->ClassName();
    if(str=="TEdit")
    {
        TEdit *edt=(TEdit *)PopupMenu1->PopupComponent;
        edt->Text="";  //popup을 호출한 Edit의 Text를 clear함.
    }
    ShowMessage("누구야? : "+str+"의 "+PopupMenu1->PopupComponent->Name+" 입니다.");
}
//---------------------------------------------------------------------------

지금까지 여기 볼랜드포럼에는 PopupComponent 사용예가 Q&A에 딱 3개 있네요
http://cbuilder.borlandforum.com/impboard/impboard.dll?action=read&db=bcb_qna&no=16487
http://cbuilder.borlandforum.com/impboard/impboard.dll?action=read&db=bcb_qna&no=29096
http://delphi.borlandforum.com/impboard/impboard.dll?action=read&db=del_qna&no=5262

그럼...