Поворот картинки типа picture в GraphABC

@MetMark · Регистрация: 04.05.2018

Студворк — интернет-сервис помощи студентам

Задача следующая:

Pascal

uses 
  GraphABC;
 
var
  SpaceShip: picture; //Текстуры
 
procedure LoadingSkins();//Подгрузка текстур
begin
  Background := Picture.Create('bin/texture/Background.png'); //Показываем местоположение текстуры на накопителе
  Background.Draw(0, 0); //Отрисовываем текстуру по данным координатам
 
end;

Предположим в на этом рисунке нарисована стрелка вверх. Как мне повернуть этот рисунок, именно рисунок, а не систему координат, предположим на +90 градусов (т.е. направо)?

Разобрался сам:

Pascal

1	Background.Draw(0, 0, 90, <ширина рисунка>, <высота рисунка>);

@JuriiMW · 24.01.2020, 05:10

модуль ABCObjects
методы для PictureABC: ScaleX и ScaleY
Пример в .\Samples\Graphics\ABCObjects\gr_PictureScale.pas

@ProMix0 · 24.01.2020, 08:10

Модуль WPFObjects, класс PictureWPF, свойство RotateAngle

@Соколиный глаз · 24.01.2020, 09:57

ProMix0, да зачем человеку с одного учебного модуля на другой переучиваться? Ради одного поворота картинки?

Если и хочется знать WPF-модули, надо с них и начинать и ими же заканчивать.

@Cu2SO4 · 24.01.2020, 16:10

Может попробовать поворот всего графического окна на 90° через SetCoordinateAngle.

@Соколиный глаз · 24.01.2020, 16:26

Cu2SO4, можете вращать саму систему координат, чтобы имитировать, например, поворот изображения.

@Cu2SO4 · 24.01.2020, 16:33

Соколиный глаз, именно так. И оно работает.

Pascal

uses graphabc;
var
  Bk : picture;
begin
  Bk := Picture.Create('tmp.png');
  SetCoordinateAngle(90.0);
  Bk.Draw(0,0-Bk.height);
  SetCoordinateAngle(0.0);
end.

@Соколиный глаз · 24.01.2020, 16:33

Cu2SO4, значит Вы молодец. Что тут ещё сказать?

@ProMix0 · 25.01.2020, 05:38

Это, как я понял, работает для всех изображений на экране, а если надо повернуть одно?

@Соколиный глаз · 25.01.2020, 11:29

ProMix0, для каждого по - своему систему координат настраивать следует в общем случае.

@JuriiMW 5058 / 2632 / 2346 Регистрация: 10.12.2014 Сообщений: 9,995
	24.01.2020, 05:10	2
	модуль ABCObjects методы для PictureABC: ScaleX и ScaleY Пример в .\Samples\Graphics\ABCObjects\gr_PictureScale.pas 0

@ProMix0 80 / 33 / 10 Регистрация: 14.06.2019 Сообщений: 516
	24.01.2020, 08:10	3
	Модуль WPFObjects, класс PictureWPF, свойство RotateAngle 0

@Соколиный глаз Alvin Seville 342 / 272 / 134 Регистрация: 25.07.2014 Сообщений: 4,537 Записей в блоге: 9
	24.01.2020, 09:57	4
	ProMix0, да зачем человеку с одного учебного модуля на другой переучиваться? Ради одного поворота картинки? Если и хочется знать WPF-модули, надо с них и начинать и ими же заканчивать. 0

@Cu2SO4 0 / 0 / 0 Регистрация: 19.12.2019 Сообщений: 11
	24.01.2020, 16:10	5
	Может попробовать поворот всего графического окна на 90° через SetCoordinateAngle. 0

@Соколиный глаз Alvin Seville 342 / 272 / 134 Регистрация: 25.07.2014 Сообщений: 4,537 Записей в блоге: 9
	24.01.2020, 16:26	6
	Cu2SO4, можете вращать саму систему координат, чтобы имитировать, например, поворот изображения. 0

@Соколиный глаз Alvin Seville 342 / 272 / 134 Регистрация: 25.07.2014 Сообщений: 4,537 Записей в блоге: 9
	24.01.2020, 16:33	8
	Cu2SO4, значит Вы молодец. Что тут ещё сказать? 0

@ProMix0 80 / 33 / 10 Регистрация: 14.06.2019 Сообщений: 516
	25.01.2020, 05:38	9
	Это, как я понял, работает для всех изображений на экране, а если надо повернуть одно? 0

@Соколиный глаз Alvin Seville 342 / 272 / 134 Регистрация: 25.07.2014 Сообщений: 4,537 Записей в блоге: 9
	25.01.2020, 11:29	10
	ProMix0, для каждого по - своему систему координат настраивать следует в общем случае. 0

Опции темы