[maxturbo]

Вот тебе функция

Function RecurseSeek(FILE$)
	For i=1 To CountChildren(ent)	
		child=GetChild(ent,i)
		name$=Lower(EntityName(child))
		If Instr(name$,"Сдесь указываешь имя чилда")

		EndIf			
	Next
End Function