Сборник лабораторных работ по дисциплине "Прикладное программное обеспечение". Самохвалов К.М. - 56 стр.

UptoLike

ВУЗ: 

УлГТУ | Ульяновск

Составители: 

Рубрика: 

56
StrechDraw
Рисует TGraphic на Canvas,
подгоняя (растягивая) его под
заданную область.
Canvas.StretchDraw(Bounds
(0,0,32,32), MyGraphic);
CopyRect
Копирует часть Canvas в дру-
гой, при необходимости рас-
тягивая его.
Canvas.CopyRect(Bounds
(0,0,32,32), MyBmp.Canvas,
Bounds(0, 0, 640, 480));
Все эти функции являются методами TCanvas.
Описанный выше способ позволяет рисовать bitmap в run-time. Также
можно поместить на форму компонент TImage и установить в нем картинку.
Пример использования:
procedure TForm1.Button1Click(Sender: TObject);
begin
if opendialog1.execute then
image1.Picture.LoadFromFile(opendialog1.filename);
end;
Для изменения графической информации, например, для создания иг-
ры, потребуется несколько раз в секунду перерисовывать объекты на Canvas
или перемещать Image. Для отслеживания интервалов и запуска при этом
пользовательских процедур, предназначен компонент TTimer.
TTimer создает событие OnTimer, интервал которых задан в свойстве
Interval. Этот интервал задается в миллисекундах и работает относительно
точно. Тем не менее
не рекомендуется его применение при точных вычисле-
ниях. С помощью свойства Enabled счетчик можно запустить (true) или оста-
новить (false).
Варианты заданий:
1. Разработать программу, реализующую игру «Тетрис».
2. Разработать программу, реализующую игру «Ксоникс».
3. Разработать программу, реализующую игру «Арканоид».

Страницы