Получить Tag экземпляра TImage

[neizerth]

Как возможно Получить Tag экземпляра TImage при щелчке на одном из пунктов PopupMenu при условии что Popupmenu вызывается на этом экземпляре?

[tavrocotaps]

Можно так:

for (int i = 0; i<Form1->ComponentCount; i++)
 { 
   if (dynamic_cast<TImage>(Form1->Component[i])&&
      ((TImage)Form1->Component[i]->PopupMenu == PopupMenu1))

   int temp = (TImage)Form1->Component[i]->Tag;

 }

Для более красивого решения давай описание задачи.