*ObjectOverlaps(toObject) *... With toObject lnObjTop = .Top lnObjBot = .Top + .Height lnObjLft = .Left lnObjRgt = .Left + .Width Endwith For Each loObject In This.objCollector.aCollection With loObject If !Compobj(loObject, toObject) and ; ( m.lnObjBot > .Top And ; m.lnObjTop < .Top + .Height And ; m.lnObjRgt > .Left And ; m.lnObjLft < .Left + .Width ) Return .T. Endif Endwith endfor *... return .f.objCollector is from Foxyclasses and provides methods to drilldown to objects in a container (here form).