Y si quieres identificarlos por el caption puedes hacer:
Código Delphi
[-]procedure TForm_Menu.Eliminar_Menu; var I: Integer; Temp: TComponent; begin for I := ComponentCount - 1 downto 0 do begin Temp := Components[i]; if Temp is TMenuItem then begin if TMenuItem(Form_Menu.FindComponent(Temp.Name)).Caption = 'Caption del Menu' Then begin //ejecutar tu codigo end; end; end; end;