» » » Курсовая работа: Движущаяся машина

Курсовая работа: Движущаяся машина

Курсовая работа: Движущаяся машина казакша Курсовая работа: Движущаяся машина на казахском языке
Содержание
Введение_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _3
Постановка задачи _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __ _ _ _ _ _ _4
Теоретическая часть_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _5
Алгоритм решения задачи_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ 7
Исходный код программы _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ 8
Приложение _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ 10
Заключение_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ 11
Список использованной литературы_ _ _ _ _ _ _ _ _ _ _ _ _ 12

Введение
Программа разработана на языке DELPНI. Тема моей курсовой работы «Движущаяся машина». Цель данной курсовой работы: научится использовать и управлять графическими возможностями DELPНI. В курсовой работе я осуществил выведение графического объекта (машины) на форму при помощи метода базовой точки, а также движение объекта по поверхности формы. Все использованные мной методы принадлежат к обширным графическим возможностям DELPНI. Моя задача состоит в демонстрации только некоторых графических возможностей DELPНI.
Постановка задачи
Задача данной курсовой работы состоит том, чтобы научиться использовать графические возможности Delphi. Нужно при помощи метода базовой точки, который относится к графическим возможностям Delphi, на поверхности формы вначале отрисовать объект, грузовой автомобиль, а затем при помощи различных процедур осуществить движение этого автомобиля по поверхности формы справа на лево. Перемещение автомобиля с одной точки к другой производится путем стирания автомобиля в предыдущей точке и отрисовке автомобиля в новой точке (на новом месте). Такие перерисовки графического объекта осуществляются через определенный малый промежуток времени при помощи компонента Delphi под названием TTimer. Также можно выбрать необходимую скорость движения автомобиля на поверхности формы. Скорость автомобиля будет меняться, если внести изменения в интервал времени в мСек (миллисекундах). То есть установить количество миллисекунд в течение которого будет стираться изображение автомобиля на прежнем месте с прежними координатами и будет отрисрван автомобиль в новом месте с новыми координатами. Для того чтобы более реально отобразить движение автомобиля по форме я выбрал 50 мСек. После того как автомобиль доедет до правой границы формы и полностью уйдет за нее, он появится вновь с левой стороны формы и начнет опять продолжать свое движение. Автомобиль будет двигаться по форме до тех пор пока пользователь не остановит его нажав кнопку Выход. Созданная программа с удобным интерфейсом позволяет продемонстрировать использованный метод базовой точки и навыки работы с таймером, что относится к графическим возможностям Delphi. Программа проста и удобна в использовании, отвечает на все запросы пользователя. Не смотря на простоту, выполняет все задачи, поставленные в условии. В ходе программы использовать компоненты TTimer, ТButton, а также многие процедуры и методы, которые в совокупности обеспечивают выполнение поставленной задачи.

Теоретическая часть

В данной курсовой работе мною были использованы различные
процедуры, функции, методы, операторы, переменные, компоненты:

• Delphi 6 – приложение Borland, язык программирования, в принципе основная часть всего создания программы.

• ТButton – стандартная командная кнопка, обычно кнопка используется для запуска действия. Щелчок на командную кнопку - это пример того, что в Windows называется событием. Щелчок мышью – событие On Click. Свойство Default=True ассоциирует вводимый компонент с кнопкой Enter, Cancel=True – с кнопкой Esc. Свойства Color для оформления, надписи (Caption) у кнопки нет. Амперсант, помещенный в тексте надписи, указывает быструю Alt-клавишу запуска, например, Caption=A&Ppend вызывает срабатывание кнопки при нажатии Alt-P. Свойство ModalResult=true определит обязательность нажатия для закрытия дочернего окна.
Компонент ТButton находится на вкладке палитры компонентов под названием Standard (рис1).
Рис1

• TTimer –невизуальный компонент для обеспечения периодического вызова процедур или осуществления прочих периодических действий.
Свойства компонента TTimer:
Name – имя компонента. Используется для доступа к компоненту
Interval - Период генерации события ОnTimer. Задается миллисекундах.
Enable – Разрешение работы. Разрешает (значение True) или запрещает (значение False) генерацию события ОnTimer.
Добавляется компонент TTimer к форме обычным образом, однако, поскольку компонент TTimer является невизуальным, т.е. во время работы программы он не отображается на форме, его значок можно поместить в любое место формы.
Компонент TTimer генерирует событие ОnTimer. Период возникновения события ОnTimer измеряется в миллисекундах и определяется значением свойства Interval. Следует обратить внимание на свойство Enable. Оно дает возможность программе «запустить» или «остановить» таймер. Если значение свойства Enable равно False, то событие ОnTimer не возникает.

Компонент TTimer находится на вкладке System палитры компонентов (рис2).

Таким образом при помощи всего двух компонентов осуществляется отображение графического объекта (грузового автомобиля) на поверхности формы. А также при помощи кнопки осуществляется выход из программы. Но, однако, самое главное, а именно отрисовка изображения осуществляется в коде программы. Таймер осуществляет запуск перерисовки объекта на новом месте. Таким образом осуществляя движение графического объекта (грузового автомобиля).

• Метод базовой точки.
При программировании сложных изображений, состоящих из множеств элементов, используется метод, который называется методом базовой точки.
Суть этого метода заключается в следующем:
1. Выбирается некоторая точка изображения, которая принимается за базовую.
2. Координаты остальных точек отсчитываются от базовой точки.
3. Если координаты точек изображения отсчитывать от базовой в относительных единицах, а не в пикселах, то обеспечивается возможность масштабирования изображения.

• Отрисовку и стирание изображения автомобиля выполняет процедура Mashina, которая получает в качестве координаты базовой точки и цвет, которым надо вычертить изображение автомобиля. Если при вызове процедуры цвет отличается от цвета формы, то процедура рисует грузовой автомобиль, а если совпадает – то «стирает». В процедуре Mashina объявлены константы dx и dy, определяющие шаг (в пикселах), используемый при вычислении координат точек изображения. Меняя значения этих констант можно проводить масштабирование изображения.
Алгоритм решения задачи

Шаг 1
Раздел описания переменных, координат автомобиля (базовой точки) используемых в программе.

Шаг 2
Процедура позволяющая выполнить отрисовку и стирание изображения грузового автомобиля.

Шаг 3
Обработка сигнала таймера. Процедура, выполняющая стирание изображения в предыдущей точке и выполняющая отрисовку грузового автомобиля в точке с новыми координатами.

Шаг 4
Процедура, присваивающая грузовому автомобилю начальные координаты и произведение повторения процедуры обработки сигнала таймера с интервалом в каждые 50 мСек.

Шаг 5
Процедура позволяющая пользователю выйти из программы, нажав кнопку с надписью «Выход».

Исходный код программы

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls;

type
TForm1 = class(TForm)
Timer1: TTimer;
Button1: TButton;
procedure Timer1Timer(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
x,y: integer; // координаты автомобиля (базовой точки)

implementation

{$R *.DFM}

procedure Mashina(x,y: integer; // координаты базовой точки
color: TColor); // цвет автомобиля
const
dx = 4;
dy = 4;
var
buf: TColor;
buf1: TColor;
begin
with form1.canvas do
begin
buf:=pen.Color; // сохраним текущий цвет.....



Полную версию материала можете скачать на сайте zharar.com через 30 секунд !!!

Автор: almira777 | 40 |


Комментарии для сайта Cackle

Загрузка...
Рекомендуем:
Курсовая работа: Касса автовокзала
Сборник курсовых работ [бесплатно]
Курсовая работа: Касса автовокзала
Курсовая работа: Возможности программы excel
Сборник курсовых работ [бесплатно]
Курсовая работа: Возможности программы excel
Курсовая работа: База данных «Деканат"
Сборник курсовых работ [бесплатно]
Курсовая работа: База данных «Деканат"
Курсовая работа: Авторское право Республики Казахстан
Сборник курсовых работ [бесплатно]
Курсовая работа: Авторское право Республики Казахстан
Курсовая работа: Автоматизированные информационно-поисковые системы
Сборник курсовых работ [бесплатно]
Курсовая работа: Автоматизированные информационно-поисковые системы
Курсовая работа: Автоматизация работы отдела кадров
Сборник курсовых работ [бесплатно]
Курсовая работа: Автоматизация работы отдела кадров
Курсовая работа: Автоматизации технологического процесса вулканизации автомобильных покрышек
Сборник курсовых работ [бесплатно]
Курсовая работа: Автоматизации технологического процесса вулканизации автомобильных покрышек
Курсовая работа: “Языки и технологии программирования” Коровы и быки
Сборник курсовых работ [бесплатно]
Курсовая работа: “Языки и технологии программирования” Коровы и быки
Курсовая работа: Финансы малого предприятия
Сборник курсовых работ [бесплатно]
Курсовая работа: Финансы малого предприятия
Курсовая работа: Технология программирования создание игры «О! Счастливчик!»
Сборник курсовых работ [бесплатно]
Курсовая работа: Технология программирования создание игры «О! Счастливчик!»
Курсовая работа: Технология программирования
Сборник курсовых работ [бесплатно]
Курсовая работа: Технология программирования
Курсовая работа: Технологии социальной работы с семьей
Сборник курсовых работ [бесплатно]
Курсовая работа: Технологии социальной работы с семьей
Курсовая работа:  методов защиты БД на основе Visual FoxPro для  предметной области воздушные перевозки
Сборник курсовых работ [бесплатно]
Курсовая работа: методов защиты БД на основе Visual FoxPro для предметной области воздушные перевозки
Курсовая работа: МАЛОШУМЯЩИЕ ОДНОЗЕРКАЛЬНЫЕ ПАРАБОЛИЧЕСКИЕ АНТЕННЫ
Сборник курсовых работ [бесплатно]
Курсовая работа: МАЛОШУМЯЩИЕ ОДНОЗЕРКАЛЬНЫЕ ПАРАБОЛИЧЕСКИЕ АНТЕННЫ
Курсовая работа: База данных «Деканат»
Сборник курсовых работ [бесплатно]
Курсовая работа: База данных «Деканат»
Қазақша Анекдот: Машина жақсы ма екен?
Анекдоттар мен әзілдер жинағы
Қазақша Анекдот: Машина жақсы ма екен?

RU / Сборник курсовых работ [бесплатно], скачать бесплатно Движущаяся машина курсовую работу, база готовых курсовых работ бесплатно, готовые курсовые работы Движущаяся машина скачать бесплатно, курсовая работа программирование скачать бесплатно, скачать бесплатно Движущаяся машина курсовую работу база готовых курсовых работ бесплатно готовые курсовые работы Движущаяся машина скачать бесплатно курсовая работа программирование скачать бесплатно, Курсовая работа: Движущаяся машина