Picture.Cut

ConvertToBMP (Изменение картинки)
Объект: Картинка Статус разработки: Реализована Тип: Функция Обращение к БД: Нет Исключения: Невозможно превратить в число, неверные параметры Визуальность: Нет

• Начальная страница
• Общее описание
• Объекты
• Картинка

Функция получает копию заданного региона исходной картинки в виде новой картинки.

Синтаксис

Picture.Cut(<Координата X верхней левой точки (INT)>,<Координата Y верхней левой точки (INT)>,<Координата X нижней правой точки (INT)>,<Координата Y нижней правой точки (INT)>):<Копия заданного региона исходной картинки (PICTURE)>

Аргументы

• <Координата X верхней левой точки (INT)>,<Координата Y верхней левой точки (INT)> - Аргументы задают координату верхней левой точки прямоугольника. Первая точка имеет координату (1,1), координата Y растет по направлению вниз, X по направлению вправо.
• <Координата X нижней правой точки (INT)>,<Координата Y нижней правой точки (INT)> - Аргументы задают координату нижней правой точки точки прямоугольника.

Возвращаемое значение

Возвращает новый объект картинки, копию региона исходной картинки, ограниченной заданным прямоугольником.

Примеры

//Создадим картинку 1000 на 1000.
aPic:=Picture.Create(1000,1000,toRgb(255,255,255),32);
//Выведем 200 случайных линий, случайной толщины, имеющими альфа 50%
randomize;
for i:=0 to 200 do
  aPic.Line(random(1010)-5,random(1010)-5,random(1010)-5,random(1010)-5,toRgb(random(256),random(256),random(256)),Random(15)+1,1,500);
enddo;
//Нарисуем красный треугольник со случайными координатами
ax:=random(1000)+1;ay:=random(1000)+1;
bx:=random(1000)+1;by:=random(1000)+1;
cx:=random(1000)+1;cy:=random(1000)+1;
aPic.Line(ax,ay,bx,by,_CLR_RED,5,1);
aPic.Line(bx,by,cx,cy,_CLR_RED,5,1);
aPic.Line(cx,cy,ax,ay,_CLR_RED,5,1);
//Вырежем только треугольник с задним фоном
aPic:=aPic.Cut(min(ax,bx,cx)-5,min(ay,by,cy)-5,max(ax,bx,cx)+5,max(ay,by,cy)+5);
//Сохраним картинку в файле (расширение будет добавлено автоматически)
aPic.Save("c:\Result");