Написать программу «Текстовый блокнот», которая позволяет открывать текстовые файлы (*.txt), редактировать их и сохранять изменения. Программа должна иметь дружелюбный пользовательский интерфейс, а также главное меню программы.

Выполнение.

            Создайте новый проект и сохраните его в отдельной папке. Самостоятельно назовите проект в соответствии с правилами создания имен переменных.

            Чтобы создать простейший текстовый редактор нам понадобиться компонент «Memo».

            «TMemo» - многострочное редактируемое текстовое поле. Компоненты класса «TMemo» предназначены для ввода, редактирования и/или отображения достаточно длинного многострочного текста. Текст храниться в свойстве «Lines» класса «TStrings» и представляет собой пронумерованный набор строк (нумерация начинается с нуля). С помощью свойств и методов этого класса («Count», «Add», «Delete», «Clear» и т.д.) можно динамически формировать содержимое компонента.

Таблица 1.  Основные свойства TMemo

              Для создания пользовательского меню нам понадобиться компонент «MainMenu». Этот компонент определяет главное меню программы. На форму можно помещать сколько угодно компонентов этого класса, но отображаться в строке меню в верхней части формы будет только тот из них, который указан в свойстве «Menu» формы.

После установки компонента на форму можно создать пункты меню. Для этого следует либо дважды щелкнуть мышкой на компоненте, либо вызвать контекстное меню и выбрать команду «Menu Designer», либо выбрать свойство «Items» в окне инспектора объектов. Создание пунктов меню происходит путем выбора свободной области и набора названия пункта. Обработка выбора конкретного пункта происходит при описании события «OnClick» соответствующего пункта.

            Положите на форму редактор «Memo» и распределите его по всей форме. На него положите компонент «MainMenu». Вызовите «Menu Designer» и создайте меню как на рисунке. Для получения разделителя между пунктами «Закрыть» и «Выход» используйте символ «минус». После создания меню закройте «Menu Designer»

Сохраните проект и проверьте на ошибки. Запустите приложение  и проверьте работоспособность главного меню.

Для выполнения операций открытия и сохранения файлов нам понадобятся диалоговые окна. На палитре компонент найдите два компонента «OpenDialog» и «SaveDialog». Поместите их на форму.

Настроить диалоговые окна очень просто. Выберите объект «OpenDialog1» и в инспекторе объектов определите свойства:

Таким же образом настройте второе диалоговое окно «SaveDialog1».

Следующий этап – описание событий каждого пункта меню. На главной форме вашего приложения выберите пункт «Файл – Открыть…». Откроется текстовый редактор с шаблоном процедуры. Опишите это событие, как показано ниже.

procedure TForm1.N3Click(Sender: TObject);

begin

    if OpenDialog1.Execute then //Если выбран файл и нажата кнопка "Открыть"

        Memo1.Lines.LoadFromFile(OpenDialog1.FileName); //Загружаем файл в Memo

end;

А теперь выберите пункт «Файл – Открыть», и опишите данное событие следующим образом:

procedure TForm1.N2Click(Sender: TObject);

begin

  if SaveDialog.Execute then

  Memo1.Lines.SaveToFile(SaveDialog.FileName);

end;

Нравится