Тема
:
Определить наличие объекта в точке
Показать сообщение отдельно
11.07.2011, 22:52
#
2
NitE
злобный флудер
Регистрация: 10.07.2007
Сообщений: 2,585
Написано 789 полезных сообщений
(для 1,476 пользователей)
Всего наград 1
Ответ: Определить наличие объекта в точке
Function RectsOverlap:Byte(x0, y0, w0, h0, x2, y2, w2, h2)
If x0 > (x2 + w2) Or (x0 + w0) < x2 Or y0 > (y2 + h2) Or (y0 + h0) < y2
Return 0
Else
Return 1
EndIf
End Function
(Offline)
NitE
Посмотреть профиль
Найти ещё сообщения от NitE