Курсовая работа: База данных DVD–фильмов

Типизированный файл с записями

c

integer

Счётчик записей

i

integer

Элемент массива

n

integer

Элемент массива

buf

disk

Запись

el

tdvd

Массив с записями

procedure Tform1.editzap;

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

Алгоритм.

1. Открываем на чтение основной файл с информацией и в переменную name заносим название dvd, один из параметров которого нам необходимо заменить.

2. Пока нет конца файла, запускаем счётчик n. Сравниваем введённое название, с имеющимися в dvd. При совпадении присваиваем переменной m значение счётчика. Переменная m будет отвечать за позицию записи в фале. Далее переменной new присваиваем данные, которые надо записать в вместо исходных.

3. Переходим с помощью функции seek на позицию m-1, то есть над необходимой записью. Читаем из файла запись.

4. Затем в case comboBox3.ItemIndex выбираем поле которое необходимо заменить и присваиваем ему значение переменной new. Если параметр не символьный переводим переменную new в цифровой формат при помощи функции.

5. Перезаписываем запись в файле. Закрываем его и выводим на экран при помощи процедуры vivod.

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

Идентификатор

Тип

Назначение

f1

К-во Просмотров: 841
Бесплатно скачать Курсовая работа: База данных DVD–фильмов