|
Платные хостинги
Раскрутка сайта
Книги по программированию
TPoint in TRect, X и Y в прямоугольнике
- Сравнивая иксовые координаты точки и углов прямоугольника, потом - игрековые. If point.X>...
- Код var Point : TPoint; Rect : TRect;begin ... if PtInRect(Rect, Point) then ...highlightSyntax('delphiYTZlNj','delphi');
- Код var rect, rect1, rect2 : TRect;begin ... if IntersectRect(rect, rect1, rect2) then begin // rect1 и rect2 пересекаются, rect - прямоугольник пересечения end else // не пересекаютсяend;highlightSyntax('delphimFhMDM','delphi');
Интернет казино
Онлайн игры
Увеличение члена
Купить DVD
|