Проверить на пересечение два прямоугольника, заданные вещественными значениями
function OverlapRect(ax0, ay0, ax1, ay1, bx0, by0, bx1, by1, Delta: Double; flBorder: boolean): boolean;