Задача на строки и массивы, программа для работы с базой тел.станции Опции

[demure]

Пожалуйста! Помогите срочно! Хотя бы наводку какую-нибудь... Вообще без понятия, что тут делать

Программа должна содержать меню и ввод-вывод в окна на экране. Необходимо предусмотреть контроль ошибок пользователя при вводе данных.
При разработке программы применить технологию нисходящего проектирования. Логически законченные объекты оформить в виде подпрограммы, все необходимые данные которым передаются через список параметров. Использование глобальных переменных следует избегать.

Итак, задание
Предприятие имеет местную телефонную станцию на 20 номеров. Телефонный справочник данного предприятия для каждого номера телефона содержит номер помещения и список служащих, сидящих в данном помещении.
Составить программу, которая:
- корректирует базу
- по номеру помещения выдает номер телефона
- по фамилии выдает номер телефона и номер помещения.
номер телефона двузначный.

[volvo]

а вот с изменением. не совсем понимаю, как делать...

Как раз, с изменением дело тоже обстоит просто. Тебе нужно выбрать (а может, это указано у тебя в задании где-нибудь), ты хочешь работать напрямую с файлом, или сначала все данные читать в массив, обрабатывать их, и перезаписывать файл?

Я бы советовал второй вариант. Тогда алгоритм изменения записи такой: Читаешь содержимое файла в массив, по нужному тебе полю ищешь запись, которую надо поменять, и, собственно, меняешь:

WhatToFind := '...'; { Кого будем искать, эту строку можно и вводить с клавиатуры}
For i := 1 To 20 Do
  With Book[i] Do Begin

    { Может быть не FIO, а любое другое поле из типа TelefStation,
       зависит от того, что тебе нужно искать }
    If FIO = WhatToFind Then Begin 
      { Здесь запрашиваешь новые данные и заменяешь ими старые }
    End;