| Описание |
Функция PointsEqual сравнивает значения параметров Point1 и Point2, и возвращает Истину (True), если они равны.
Если любое значение X или Y каждой точки различно, то будет возвращена Ложь (False).
|
|
| Похожие команды |
Bounds Передаёт координаты вершин объекта типа TRect (прямоугольник)
Point Генерирует значение TPoint из значений X и Y
PtInRect Проверяет, находится ли точка в пределах прямоугольника
Rect Создаёт величину TRect с указанием 2 точек или 4 координат
TPoint Содержит целочисленные значения X и Y
TRect Содержит значения координат прямоугольника
| |
|
| Пример кода : Сравнение различных и идентичных точек |
var
start, finish : TPoint;
begin
// Установка начальной и конечной точек
start := Point(1, 2);
finish := Point(3, 4);
// Начальная точка равна конечной точке?
if PointsEqual(start, finish)
then ShowMessage('1,2 = 3,4')
else ShowMessage('1,2 <> 3,4');
// Попытка использования PointsEqual с идентичными значениями
if PointsEqual(Point(2,9), Point(2,9))
then ShowMessage('2,9 = 2,9')
else ShowMessage('2,9 <> 2,9');
end;
|
1,2 <> 3,4
2,9 = 2,9
|
|
