Как удалить TImage* зная только его Hint?

(TImage*)FindComponent("Image")->а дальше что?

    for(int i = 0;i < Form1->Karta_rajona->ComponentCount; i++)
    {
  if(Karta_rajona->Components[i]->???)// 
  { delete Karta_rajona->Components[i]; i--;  }
    }

TImage * a =  (TImage*)FindComponent("Image");

void __fastcall TForm2::Button1Click(TObject *Sender) {
    for (int i = 0; i < Form2->ComponentCount; i++) {
       TImage * a =  (TImage*)FindComponent(Form2->Components[i]->Name);
        if (a) {
            if (a->Hint == "То что тебе надо") {
                delete Form2->Components[i];
            }
        }
    }
}

for(int i = 0; i < this->ComponentCount; i++)
   {
     TComponent *Cmp = this->Components[i];
     if(Cmp->ClassNameIs("TImage"))
      if(((TImage*)Cmp)->Hint == "Бла-Бла-Бла")
       delete Cmp;
   }

for(int i = 0;i < ComponentCount; i++) {
    if (Components[i] is TImage) 
 {if ((Components[i] as TImage) -> Hint == "dcd") {};
}

    for (int i = 0; i < Form1->ComponentCount; i++)
    {
        TImage * a = dynamic_cast<TImage*>(Form1->Components[i]);
        if (a)
        {
            if (a->Hint == "То что тебе надо")
            {
                delete a;
            }
        }
    }

  for(int i = 0; i < Form1->Karta_rajona->ComponentCount; i++)
   {
     TComponent *Cmp = Karta_rajona->Components[i];
      if(((TImage*)Cmp)->Hint == "Line_"+IntToStr(Form_range->StringGrid_node_range->Row)+" - "+(Form_range->ComboBox_node_range->Text))
       delete Cmp;
   }

    for (int i = 0; i < Karta_rajona->ComponentCount; i++)
    {
        TImage * a = dynamic_cast<TImage*>(Karta_rajona->Components[i]);
       // if (a)
      //  {
            if (a->Hint == "Line_"+IntToStr(Form_range->StringGrid_node_range->Row)+" - "+(Form_range->ComboBox_node_range->Text))
            {
                delete a;
            }
       // }
    }

for (int i = 0; i < Form1->ComponentCount; i++)
    {
        TImage * a = dynamic_cast<TImage*>(Form1->Components[i]); // ->ClassNameIs("TImage")
        if (a)
        {
            if (a->Hint == "То что тебе надо")
            {
                delete a;
                break; // Зачем искать дальше ? А если уже искать то i--;
            }
        }
    }