Игра "Мозайка" на Делфи (Delphi). Реферат. Информатика, ВТ, телекоммуникации.
💣 👉🏻👉🏻👉🏻 ВСЯ ИНФОРМАЦИЯ ДОСТУПНА ЗДЕСЬ ЖМИТЕ 👈🏻👈🏻👈🏻
Вы можете узнать стоимость помощи в написании студенческой работы.
Помощь в написании работы, которую точно примут!
Похожие работы на - Игра "Мозайка" на Делфи (Delphi)
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Нужна качественная работа без плагиата?
Не нашел материал для своей работы?
Поможем написать качественную работу Без плагиата!
Министерство
образования и науки Российской Федерации
Курский
государственный технический университет
по
дисциплине «Программирование на языках высокого уровня»
Выполнил:
студентка группы ПО-51
Елизавета Королева
студентка группы ПО-51
Анастасия Зиновьева
Проверил:
преподаватель Петрик Е. А.
Основанием
для разработки программы является задание к курсовой работе по предмету
«Программирование на языках высокого уровня».
Игра «Мазайка» должна обеспечивать следующее:
- если картинка собрана полностью, выводится сообщение о
завершении игры;
- имеется возможность выбирать картинки;
При
постановке задачи на разработку программы «Мазайка» были рассмотрены следующие
альтернативы:
Рассматривались
операционные системы Windows и Linux.
Была выбрана система Windows в связи с широчайшим ее
распространением, доступностью и наличием гибких средств разработки
программного обеспечения под эту платформу.
-
Средства разработки. Были рассмотрены следующие средства разработки: Delphi и С++ Builder. Был выбран Borland Delphi7. Выбор обоснован популярностью и доступностью данного программного
обеспечения.
Разработка
программной документации и программы должна производиться согласно ЕСПД, ГОСТ
19.701-90, ГОСТ 2.304-88.
Данная программа должна работать автономно под управлением
операционных систем Windows 98, Windows ME, Windows
2000, Windows XP.
Программный продукт должен работать
на компьютерах со следующими характеристиками:
·
микропроцессор Intel Celeron 400 МГц;
·
монитор 17” с разрешением 1024*768;
Входными данными программы являются:
·
При запуске программного изделия должно происходить
открытие программной оболочки (формы).
Выходными данными программы являются:
·
сообщение о выигрыше, если картинка собрана.
В комплект поставки программного продукта должны входить
следующие
·
программная документация на изделие.
Программа поставляется на дискете
размером 3,5 дюйма и объемом 1,44 Мб.
Информация, содержащаяся в изделии, не является секретной,
поэтому программа не требует защиты.
Программа должна пройти функциональное тестирование и
успешно отработать на всех тестах. Тесты разрабатываются на этапе выполнения
рабочего проекта.
Восстановления данных при программном или аппаратном сбоях
не
Программа должна свободно переноситься с одного компьютера
на другой при помощи соответствующих носителей информации.
Программная документация должна разрабатываться согласно
ЕСПД, ГОСТ 19.701-90, ГОСТ 2.304-88.
Программная документация должна включать следующие
документы:
В приложении к документу «Рабочий проект» должен быть
приведен листинг исходных текстов программы и блок-схемы алгоритмов.
Выполнение
разработки должно включать две стадии:
На
стадии «Техническое задание» проводится постановка задачи, разработка
требований к программному изделию, изучение литературы по задаче и оформление
документа «Техническое задание».
На
стадии «Рабочий проект» проводится разработка схем алгоритмов для каждого из
функциональных модулей, физическое проектирование программного изделия,
разработка тестов, тестирование и отладка программных модулей. В заключение
данного этапа оформляется документ «Рабочий проект».
Тесты
должны быть разработаны на этапе рабочего проектирования программного изделия.
Приемка
программного изделия осуществляется при сдаче документально оформленных этапов
разработки, передаче программного изделия и проведении испытаний на основе
установленных тестов.
Приложение представляет собой игру «Мазайка», для которой
не требуется особое оформление в связи с тем, что рабочее поле полностью
закрывается загруженной картинкой. Игра затягивает пользователя, прежде всего
популярностью близкой игры «Пятнашки», которая не так давно была очень
популярна.
Данная
программа должна работать автономно под управлением операционных систем Windows 95, Windows 98, Windows ME, NT 4.0, Windows 2000, Windows XP.
Для
работы программного изделия требуется персональный компьютер, обладающий следующими
параметрами:
·
объем жесткого диска не менее 900 Мб;
·
микропроцессор с тактовой частотой не менее 133
МГц;
·
монитор с глубиной цвета 16 бит;
Для бесперебойной работы программы рекомендуем следующие
параметры компьютера:
·
микропроцессор с тактовой частотой 333 МГц.
·
исполнительный файл программы Mazaika.exe;
·
программная документация на изделие.
Программа прошла функциональное тестирование и успешно
отработала на всех тестах. Тесты разрабатывались на всех этапах выполнения
проекта.
Программа содержит интуитивный интерфейс, позволяющий без
дополнительных подсказок запустить игру.
Для копирования программы с дискеты на компьютер необходимо
скопировать содержимое папки «Курсовик» на жесткий диск компьютера.
проверка
на наличие «собранности» мозайки;
Windows, Messages, SysUtils, Variants, Classes,
Graphics, Controls, Forms, Dialogs, ExtDlgs, Menus;
OpenPictureDialog1: TOpenPictureDialog;
procedure FormCreate(Sender: TObject);
procedure FormMouseDown(Sender: TObject; Button:
TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure FormPaint(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N2Click(Sender: TObject);
procedure C1Click(Sender: TObject);
procedure N5Click(Sender: TObject);
widt,heig:integer; // ширина и высота одной
клетки
pole:array[1..H,1..W] of byte; // свойства поля
zx,zy:integer; // координаты пустой клетки
pos:array[1..H, 1..W] of byte =(( 1, 2, 3, 4),( 5, 6, 7,
8),( 9,10,11,12),(13,14,15, 0)); // выигрышный вариант
f: string[20]; // файл загружаемой картинки
ShowMessage('Ошибка
загрузки файла');
heig:=Pic.Height div H; // Размер клетки
ClientWidth:=widt*W; //Размер формы по
размеру картинки
Form1.Refresh; // перемещение клеток
GameOver:=True; // клети расставлены
правильно
procedure Go(clickx,clicky:integer);
if not ((abs(clickx-zx)=1) and (clicky-zy=0) or // проверка на возможность хода
(abs(clicky-zy)=1) and (clickx-zx=0))
pole[zy,zx]:=Pole[clicky,clickx]; // осуществим переход из [x,y] в [zx,zy]
Form1.Load; // перерисовка поля
r:=MessageDlg('Вы выиграли!'+ #13+'Сыграем ещё?',mtInformation,[mbYes,mbNo],0);
procedure TForm1.FormMouseDown(Sender: TObject; Button:
TMouseButton;
Shift: TShiftState; X,Y:Integer);
clickx,clicky:integer; // координаты кликаемой клетки
clickx:=Trunc(X/widt)+1; // переведём щелчок мыши в координаты клетки
procedure TForm1.Load; // отвечает за загрузку поля
lx,ly:integer; // координаты верхнего
левого угла ввода
for i:=1 to W do // отслеживает содержимое клеток
ly:=((pole[i,j]-1) div W) * heig;
// присвоим координатам верхнего левого угла ввода номер картинки
lx:=((pole[i,j]-1) mod W) * widt;
outof:=Bounds((j-1)*widt,(i-1)*heig,widt,heig);
then Canvas.CopyRect(outof,pic.Canvas,into)
else Canvas.Rectangle((j-1)*widt,(i-1)*heig,j*widt,i*heig);
procedure TForm1.refresh; // "тусует"
фрагменты картинки
x1,y1:integer; // координаты пустой клетки
x2,y2:integer; // взять картинку
из этой координаты и поменять её с пустой
n:integer; // направление
возможного хода
for i:=1 to 150 do // варианты расстановки
until (x2>=1) and (x2<=4) and (y2>=1) and
(y2<=4);
pole[y1,x1]:=pole[y2,x2]; // определим
фрагмент перемещения
zx:=x1; // координаты пустой
клетки
procedure TForm1.FormCreate(Sender: TObject);
procedure TForm1.FormPaint(Sender: TObject);
procedure TForm1.N3Click(Sender: TObject);
procedure TForm1.N2Click(Sender: TObject);
heig:=Pic.Height div H; // Размер клетки
ClientWidth:=widt*W; //Размер формы по
размеру картинки
Form1.Refresh; // перемещение клеток
procedure TForm1.C1Click(Sender: TObject);
showmessage('Программа к курсовому проекту');
procedure TForm1.N5Click(Sender: TObject);
f: string[20]; // файл загружаемой картинки
pic.LoadFromFile(openpicturedialog1.FileName);
ShowMessage('Ошибка
загрузки файла');
heig:=Pic.Height div H; // Размер клетки
ClientWidth:=widt*W; //Размер формы по
размеру картинки
Form1.Refresh; // перемещение клеток
1.3.1
Функциональное и
эксплуатационное назначение изделия Реферат. Информатика, ВТ, телекоммуникации.
Реферат по теме Искать свой особый путь
Пример Сочинения Егэ Шаблон
Сочинение На Тему Красота Спасет Мир
Разделы В Реферате Пример
Ильф Петров Полное Собрание Сочинений
Курсовая Работа Гост Содержание
Курсовая работа по теме Взаимодействие между политической и экономической властью в современной России
Реферат: Основание СНПЗ, люди завода 40е - 50е годы
Мини Сочинение От Лица Вельможи
Курсовая работа по теме Основы негативного процесса обработки фотоматериалов
Темы Сочинений Огэ 2022 По Литературе
Реферат по теме Время и место открытия наследства
Безопасность на предприятии
Курсовая работа: Развитие толерантности в системе образования - как объективная потребность современного общества
Курсовая работа по теме Программа для вычисления корней нелинейных уравнений итерационным методом
Дипломная работа: Правовое регулирование обеспечения правомерности и законности сделок с недвижимостью
Контрольная работа: Развитие средней школы на современном этапе
Реферат: Национальная политика в Карелии с 1929 по 1933 гг.
Дипломная работа по теме Розробка складу, технології та дослідження антикуперозного косметичного засобу
Лабораторная Работа По Биологии Изучение Строения
Реферат: по дисциплине «Периферийные устройства» Кафедра ксс 2006. 2007 уч. Год Digital Visual Interface (dvi)
Реферат: Обучение слепых детей
Курсовая работа: Дослідженні телевізійної рекламної продукції з погляду конструювання та продукування нею гендерн