Создаем свой текстовый редактор на Delphi

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

приложений – Delphi
Используя данный учебный курс, можно самостоятельно овладеть основами объектно – ориентированного программирования на Delphi. Для расширения Ваших знаний к курсу приложен ряд учебных пособий и справочников по Delphi
Цикл содержит 13 презентаций:
ООП на Delphi – 1: Знакомство с системой программирования Borland Delphi. Объекты (компоненты) и их свойства и методы
ООП на Delphi – 2: Первая программа на Delphi, сохранение и компиляция
ООП на Delphi – 3: Программное изменение свойств объектов
ООП на Delphi – 4: Условия в Delphi. Создание простого теста
ООП на Delphi – 5: Элементы ввода и вывода информации. Обработка исключений
ООП на Delphi – 6: Заставка программы и элемент таймер
ООП на Delphi – 7: Программируем свою игрушку
ООП на Delphi – 8: Меню программы, панель статуса, диалоги
ООП на Delphi – 9: Создаем свой текстовый редактор
ООП на Delphi – 10: Базы данных на Delphi
ООП на Delphi – 11: Калькулятор на Delphi. Обработка исключительных ситуаций
ООП на Delphi – 12: Создаем тестирующую систему
ООП на Delphi – 13: Графика на Delphi

Delphi использует язык программирования Объект Паскаль, поэтому лучше сначала изучить обычный Паскаль и поработать в ТурбоПаскале, а затем и переходить к Delphi – перейти будет очень просто, т.к синтаксис языка остается неизменным.
Изучение ООП на Delphi желательно проводить в старших профильных классах – количество часов, отводимое на информатику там вполне достаточно для освоения основ ООП на Delphi

№ 1 Домнин Константин Михайлович 2006 год

и создадим свой текстовый редактор
DELPHI - 9
Вопросы:

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

диалогов

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

выбора шрифтов, настройки печати и т.д.(все эти диалоги мы хорошо знаем, работая с операционной системой Windows)

Рассмотрим некоторые, наиболее часто применимые диалоги, и способы их использования

Компоненты для организации диалогов находятся на вкладке ДИАЛОГИ, и все они являются НЕВИЗУАЛЬНЫМИ, т.е. не видны на форме (вспомните компонент таймер)

Предназначен для создания окна открытия файла

Компонент

«Сохранить файл как ...» Предназначен для создания окна сохранения файла

Компоненты для открытия и сохранения рисунков

Создание окна для выбора шрифтов

Компоненты настройки печати и установки принтера

Компонент

замены текста

Компонент установки параметров страницы

Компонент для поиска

Delphi, компоненты организации стандартных диалогов имеют свои свойства и методы

Рассмотрим свойства компонента OpenDialog и его использование, остальные компоненты имеют с ним много общего

1) FileName (выбранный пользователем файл)
2) Filter (позволяет выбрать нужный тип файлов)
3) DefaultExt (расширение файла по умолчанию)
4) InitialDir (начальный каталог в момент открытия диалога)
5) Options (куча различных опций для диалогового окна)

Основные свойства:

☝ Рассмотрите внимательно набор свойств компонента OpenDialog в инспекторе объектов, при этом используйте справочник А.Я.Архангельского, приложенный к курсу

— Execute
Стандартное обращение к диалогу имеет вид:
if

компонента-диалога>.Execute then
<операторы, использующие выбор пользователя>;

Рассмотрим применение OpenDialog и SaveDialog на простом примере:

Создадим форму, на которой будет компонент Memo и кнопки ОТКРЫТЬ (для открытия файла в Memo) и СОХРАНИТЬ (для сохранения содержимого Memo в каком-то файле)

для отображения текста (файла)
Компоненты OpenDialog и SaveDialog
Три кнопки: ОТКРЫТЬ,

СОХРАНИТЬ, ВЫХОД

Для компонента Memo установим :
свойство Scrollbars – ssVertical (чтобы в Memo была вертикальная полоса прокрутки)
свойство WordWrap – True (разрешим перенос слов в Memo)

ОТКРЫТЬ

Этот оператор

вызывает диалог, проверяет, выбрал ли пользователь файл (если выбрал, то функция Execute возвращает true), после чего имя выбранного файла (OpenDialog1.FileName) сохраняется в переменной FName и файл загружается в текст Memo1 методом LoadFromFile
Но для того, чтобы процедура работала, нужно объявить строковую переменную FName

СОХРАНИТЬ

Первый из

этих операторов присваивает свойству FileName компонента SaveDialog1 запомненное имя файла. Это имя по умолчанию будет предложено пользователю при открытии диалога Сохранить как.... Следующий оператор открывает диалог и, если пользователь выбрал в нем файл, запоминает новое имя файла и сохраняет в файле с этим именем текст компонента Memo1

Кнопка ВЫХОД
Без комментариев

фильтр на типы файлов и расширение открываемых файлов по умолчанию

Раскроем в инспекторе объектов свойство Filter компонента OpenDialog1

Укажем тип файла (слева) и его расширение (справа) – сейчас в диалоговом окне открытия файла будут отображаться только файлы с расширением *.txt
Если записать еще строку, например Вордовcкие | *.doc , то мы можем выбрать и вордовские файлы (MS Word)

Установим тип файлов, отображаемых при запуске диалога по умолчанию - txt

программа уже умеет открывать файлы и сохранять их (и конечно

редактировать содержимое файла)

Попробовать ->

ШАГ 3

Все то же сделаем и для компонента SaveDialog:
установим фильтр на типы файлов и расширение сохраняемых файлов по умолчанию

Итак, мы рассмотрели стандартные диалоги, их свойства и методы. Следующий вопрос – создание своего текстового редактора

редактор

текстовый редактор, подобный WINDOWS-кому Блокноту (немного попроще)
Это виндовский блокнот

По его подобию наш текстовый редактор должен иметь:
Memo для отображения текста файлов и печати
Главное меню с раскрывающимися опциями
Функции создания, открытия и сохранения файла
Добавим статусную строку для отображения некоторой информации

следующие компоненты:
1. MainMenu. Создадим с помощью дизайнера систему раскрывающихся меню
2.

Memo для отображения текста. Установим свойство Align в AlClient (при этом Memo будет занимать всю клиентскую область формы, что нам и надо)

следующие компоненты:
5. StatusBar. Сформируем в полосе состояния 3 панели с

помощью редактора панелей

3. OpenDialog. Установим фильтр для текстовых файлов и расширение по умолчанию txt

4. SaveDialog. Также установим фильтр для текстовых файлов и расширение по умолчанию txt

следующие компоненты:
Если скомпилировать проект, то к нас

получается примерно такая программа

меню (открыть, создать, сохранить как ...)
1. СОЗДАТЬ. Для этого щелкнем

по разделу создать и запишем код:

Очищаем наш Memo, если в нем что-то есть

В заголовке формы пишем «Текстовый редактор»

меню (открыть, создать, сохранить как ...)
2. ОТКРЫТЬ. Для этого щелкнем

по разделу создать и запишем код:

Запускаем диалог открытия файла и, если в нем файл выбран (<> ‘ ‘), то ...

Загружаем в наш Memo текст из выбранного файла

В заголовке формы записываем имя выбранного в диалоге файла + «Текстовый редактор»

меню (открыть, создать, сохранить как ...)
3. СОХРАНИТЬ КАК ....

Запускаем диалог сохранения файла и если файл выбран (дано имя), то ...

Сохраняем в выбранном файле содержимое Memo

В заголовке формы записываем имя выбранного (заданного нами) в диалоге файла + «Текстовый редактор»

меню (открыть, создать, сохранить как ...)
3. ФОРМАТ -> ШРИФТ ....

Запускаем диалог выбора формата шрифта

Присваиваем шрифту Memo тот шрифт, который выбран нами в FontDialog

меню (открыть, создать, сохранить как ...)
3. СПРАВКА - > О

ПРОГРАММЕ ....

Открываем в модальном режиме форму с информацией о программе

Не забудьте создать новую форму (Form2) и разместить на ней информацию о программе
Познакомьте формы друг с другом. (Смотри предыдущие уроки о многоформенных приложениях)

вывести нужную информацию (например дату, время, тип файла, режим работы

...) – см. предыдущие уроки

ШАГ 4

И последнее: сохраняем все, компилируем и запускаем появившийся EXE - файл

Запускаем ->

Итак, мы создали свой текстовый редактор, который многое умеет и вполне может заменить входящий в Windows блокнот. А сейчас можете открыть MS Word и посмотреть на него глазами программиста: Да! Чрезвычайно мощный текстовый редактор (не зря в Microsoft хлеб едят ...)

На этом наш урок закончен

организацией стандартных диалогов и создали свой текстовый редактор

ИТОГИ УРОКА:
ООП на

Delphi – 10:
Мы рассмотрим использование в Delphi баз данных и создадим содержащее их приложение

НА СЛЕДУЮЩЕМ УРОКЕ: