Rect - Функция. Справочник

Delphi справочник - Форум программистов - Навигация

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z По первой букве

System SysUtils StrUtils DateUtils FileCtrl ConvUtils StdConvs Math Classes Dialogs Types Variants ПО Unit Compiler directives Directives Keywords Types Variables Constants Functions Procedures По категории

Основы Delphi
Rect Функция	Создаёт величину TRect с указанием 2 точек или 4 координат	Classes unit

1 function Rect ( Left, Top, Right, Bottom : Integer ) : TRect;

2 function Rect ( TopLeft, BottomRight : TPoint ) : TRect;

Описание

Delphi функция Rect создает объект TRect (прямоугольник), для создания прямоугольника необходимо указать 4 координаты или 2 точки.

При создании с указанием двух точек TopLeft и BottomRight, вы можете передать две величины TPoint или использовать функцию Point.

Примечания

Важно

В модулях Classes и Types есть две функции Rect. Только прежняя поддерживает второй синтаксис.

При использовании в вашем коде обоих из этих модулей, и Вы указали Types после Classes, то вы должны использовать Rect с прификсом Classes, чтобы использовать этот второй синтаксис.

Похожие команды

Bounds  Передаёт координаты вершин объекта типа TRect (прямоугольник)

Point  Генерирует значение TPoint из значений X и Y

PointsEqual  Сравнивает два значения TPoint на предмет равенства

PtInRect  Проверяет, находится ли точка в пределах прямоугольника

TPoint  Содержит целочисленные значения X и Y

TRect  Содержит значения координат прямоугольника

Пример кода : Создание двух прямоугольников с использованием обоих синтаксисов

var
  rectangle1, rectangle2 : TRect;

begin
  // Установка первого прямоугольника, используя 1-ый синтаксис
  rectangle1 := Rect(20, 40, 60, 80);

  // Установка второго прямоугольника, используя функцию Rect
  rectangle2 := Classes.Rect(Point(20, 40), Point(60, 80));

  // Отображение верхней левой и правой нижней координаты каждого прямоугольника
  ShowMessageFmt('Координаты 1-го Прямоугольника = %d,%d,%d,%d',
                 [rectangle1.Left,
                  rectangle1.Top,
                  rectangle1.Right,
                  rectangle1.Bottom]);

  ShowMessageFmt('Координаты 2-го Прямоугольника = %d,%d,%d,%d',
                 [rectangle2.Left,
                  rectangle2.Top,
                  rectangle2.Right,
                  rectangle2.Bottom]);
end;

Координаты 1-го Прямоугольника = 20,40,60,80
Координаты 1-го Прямоугольника = 20,40,60,80

Оплата за обучение в Kata Academy только после твоего трудоустройства в IT, начни карьеру Middle Java-разработчика

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки? Slurm подготовили для вас особенный продукт!