Geum.ru

База данных DVD–фильмов

Курсовой проект - Компьютеры, программирование

Другие курсовые по предмету Компьютеры, программирование

µржит входную переменную Sender - тип tobject, этот параметр определяет, какой объект программы вызывает данную процедуру.

procedure TForm1.N9Click(Sender: TObject);

Данная процедура запускает процедуру очистки списка clearlist, путём нажатия на необходимый пункт во всплывающем меню. Процедура содержит входную переменную Sender - тип tobject, этот параметр определяет, какой объект программы вызывает данную процедуру.

procedure TForm1.N23Click(Sender: TObject);

Данная процедура запускает процедуру очистки списка clearlist, путём нажатия на необходимый пункт в меню. Процедура содержит входную переменную Sender - тип tobject, этот параметр определяет, какой объект программы вызывает данную процедуру.

procedure TForm1.N6Click(Sender: TObject);

Данная процедура запускает процедуру редактирования redactor из меню. Процедура содержит входную переменную Sender - тип tobject, этот параметр определяет, какой объект программы вызывает данную процедуру.

procedure TForm1.N21Click(Sender: TObject);

Данная процедура отображает окно с информацией о программе.

procedure tform3.input(var f:recordfile; var dvdfile:string);

Данная процедура осуществляет запись данных в файл.

Параметр “f” типизированный файл типа recordfile. Dvdfile деректория файла.

Алгоритм:

  1. Привязываем к файловой переменной “g” временный файл derect+buffer.db и перезаписываем его. Привязываем к файловой переменной “f” переменную dvdfile и открываем на чтение.
  2. Если в файле находится что-либо, копируем содержимое “f” в “g” и закрываем “f”, если нет, перезаписываем и закрываем “f”.
  3. Присваиваем переменным записей введенные поля.
  4. Проверяем наличие введённого dvd в файле, путем сравнения названия введённой диска с уже находящимися в файле в цикле достижения конца файла. Если поля равны, присваиваем переменной k значение 1, если нет, то оставляем по умолчанию равной нулю.
  5. Далее проверяем значение переменой k. Если k=1, то выводится сообщение о том что данный диск существует и запись не осуществляется, если иначе, то происходит запись в файл.
  6. В конце закрываем “g” и удаляем “f”. Переприсваиваем директорию dvdfile переменной “g”. И выводим обновлённый список с помощью процедуры vivod.

 

Таблица 8. Локальные переменные.

ИдентификаторТипНазначениеsdiskЗаписьqdiskЗапись

procedure tform1.search_1(dvdfile:string; var g:recordfile);

procedure tform1.search_2(dvdfile :string; var g:recordfile);

procedure tform1.search_3(dvdfile:string; var g:recordfile);

procedure tform1.search_4(dvdfile:string; var g:recordfile);

procedure tform1.search_5(dvdfile:string; var g:recordfile);

Процедуры, приведены выше, почти одинаковы и различается лишь поле, по которому происходит поиск. Во всех процедурах, кроме второй, на экран выводится только те записи, поля которых полностью совпадают, с введёнными нами данными. В третьей, четвёртой и пятой процедурах список выводится отсортированным по названию модели. Параметр “g” типизированный файл типа recordfile. Параметр dvdfile директория файла.

procedure TForm1.Button4Click(Sender: TObject);

Данная процедура отвечает за функцию изменения информации. При нажатии на кнопку курсором вызывается процедура editzap.

procedure TForm1.Button7Click(Sender: TObject);

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

2.3 Расчёт объёма оперативной памяти

 

Как я уже говорил раньше, эта программа почти ни чего не ест, т. е. занимает очень мало места. Для определения потребляемой памяти, я использовал стандартный диспетчер задач Windows. Исходя из данных показанных в нём, в процессе работы программа максимально потребляет 5000 кб.

 

2.4 Интерфейс программы

 

При запуске программы появляется окно, с дружественным интерфейсом рис. 1. Все операции выполняются в данном окне. При вызове информации о программе в пункте меню появляется окно, содержащее необходимую информацию рис. 2. Функция добавления изображена на рис. 3. Функция поиска изображена на рис. 4.

 

Рисунок 1. Главное окно

Рисунок 2.. Информация о программе.

 

Рисунок 3. Окно добавления новой информации.

 

Рисунок 4. Окно поиска информации

3. Проверка работоспособности

 

3.1 Комплект поставки программы

 

  1. dvdproekt.exe - исполняемый файл программы
  2. Savedvd - папка с файлом db_disk.db, содержащим базу данных. Также папка используется для хранения временных файлов, создаваемых во время работы программы.

 

3.2 Описание результатов проверки программы

 

Технические средства, используемые для написания работы, приведены в таблице 10. Для проверки работоспособности программы я использовал компьютеры с различной конфигурацией . Их конфигурации приведены в таблице 10

 

Таблица 10. Описание результатов проверки программы.

Компоненты ЭВМ, программное обеспечениеКонфигурация ЭВМ

 

№Микропроцессор, тактовая частотаОбъем оперативной памятиТип видеоадаптера, объем видеопамятиОбъем дискового пространстваОперационная система1Intel (R) Celeron, 1.7 GHz128 MbIntel (R) 828456 Graphics controller, 32 Mb10 GbMS Windows 20002AMD Turion 64x2 Mobile Technology TL-60 2.0 GHz3 GbNVIDIA GeForce 8600 GS, 512 Mb320 GbMS Windows Vista3AMD Sempron (tm) 2200+, 1.5 GHz768 MbATI Radeon 9600 series, 128Mb80 GbMS Windows XP ProfessionalКонфигурация ЭВМ

4Pentium (R) D, 2x2.8 Mhz1.5 GbNVIDIA GeForce 8500 GT, 256 Mb80 GbMS Windows XP Professional5Pentium 4, 3.01Ghz512 MbATI Radeon X1600, 256Mb20 GbMS Windows XP Professional

3.3 Минимальные системные требования

 

1.Процессор: 170 MHz;

2. Оперативная память: 5000kb;

3. Физическая память на жестком диске: 1400MB свободного места;

4. Видеокарта с поддержкой VGA;

5. Устройства ввода/вывода данных: клавиатура, монитор, мышь.

Заключение

 

Вот и вс