Карта сайтаСсылкиКонтакты

Создаем текстовый редактор в Delphi - Добавление меню и панели инструментов

PDF Печать
Статьи
Индекс материала
Создаем текстовый редактор в Delphi
Добавление меню и панели инструментов
Добавление стандартный действий
Добавление меню в приложение
Добавляем Панель инструментов
Создание справки
Окно О программе...
Все страницы

Добавление меню и панели инструментов

Для этого приложения практически ничего не нужно делать для создания меню и панели инструментов. Мы создадим Action List, в котором будут находиться все команды.

Ниже приведены все команды, которые нам потребуются при создании текстового редактора.

Команда Меню Есть на панели инструментов? Описание
Новый Файл Да Создается новый файл.
Открыть Файл Да Открывается созданный файл для редактирования.
Сохранить Файл Да Сохраняется текстовый файл на диск.
Сохранить как Файл Нет Сохраняется файл, используя новое имя.
Выход Файл Да Выход из программы.
Вырезать Правка Да Удаляет текст и сохраняет в буфере обмена.
Копировать Правка Да Копирует текст и сохраняет в буфере обмена.
Вставить Правка Да Вставляет текст из буфера обмена.
Содержание Помощь Да Отображает содержание справочного файла.
Индекс Помощь Нет Отображает страницу индекса справочного файла.
О программе Помощь Нет Отображает информацию о программе в окне.

Также можно собрать все изображения для панели инструментов в ImageList.

Для того, чтобы добавить ActionList и ImageList на форму, проделайте следующее:

  1. На Палитре компонентов , на вкладке Standard щелкните на значок компонента ActionList и щелкните на форму в любом месте. Не имеет значения, в каком месте на форме он будет находиться, т.к. это не визуальный компонент и отображаться во время выполнения программы не будет.

  2. На вкладке Win32 выберите компонент ImageList и поместите его на форму. Также можете поместить его в любом месте.

Ваша форма должна выглядеть примерно так:

Форма с добавленными на нее ActionList и ImageList

Добавляем действия в ActionList

Далее мы будем добавлять действия в ActionList.

1. Сделайте двойной щелчок на ActionList, который находится на форме. Откроется диалоговое окно Editing Form1.ActionList. Оно называется редактор списка действий.

2. Щелкните правой кнопкой на редакторе и выберите New Action.

Добавляем новое действие в ActionList

3. В Инспекторе объектов установите следующие свойства для этого действия:

  • Свойство Caption установите равным &Новый. Обратите внимание, что мы добавили амперсанд перед первой буквой. Это будет горячая клавиша.
  • В поле Category напишите Файл. Это организует команды меню Файл в одном месте.
  • Свойство Hint установите равным Создать файл (это будет подсказка).
  • В поле ImageIndex запишите 0 (это будет ассоциировать изображение номер 0 в Вашем ImageList).
  • В поле Name введите FileNew (для команды Файл -> Новый).
Добавление пункта Файл

4. Щелкните правой кнопкой на Редакторе действий и выберите New Action.

5. В Инспекторе объектов установите следующие свойства для нового действия:

  • Caption равен &Открыть.
  • Убедитесь, что Category равна Файл.
  • В свойстве Hint введите Открыть файл.
  • ImageIndex равен 1.
  • В поле Name введите FileOpen (для команды Файл -> Открыть).

6. Щелкните правой кнопкой на Редакторе действий и выберите New Action.

7. В Инспекторе объектов установите следующие свойства:

  • Caption - &Сохранить.
  • Убедитесь, что в Category выбран Файл.
  • В поле Hint введите Сохранить файл.
  • ImageIndex равен 2.
  • Name установите в FileSave (для команды Файл -> Сохранить).

8. Щелкните правой кнопкой в Редакторе действий и выберите New Action.

9. В Инспекторе объектов установите следующие свойства:

  • CaptionСохранить &как.
  • CategoryФайл.
  • HintСохранить файл как.
  • Поле ImageIndex не трогайте (оставьте по умолчанию), здесь изображение не требуется.
  • NameFileSaveAs (для команды Файл -> Сохранить как).

10. Щелкните правой кнопкой в Редакторе действий и выберите New Action.

11. В Инспекторе объектов установите следующие свойства:

  • CaptionВ&ыход.
  • CategoryФайл.
  • strong>Hint – Выход из программы.
  • ImageIndex3.
  • NameFileExit (для команды Файл -> Выход).

12. Щелкните правой кнопкой на Редакторе действий и выберите New Action для создания команд справки.

13. В Инспекторе объектов введите следующие свойства:

  • В поле Caption введите С&одержание.
  • В поле Category введите Помощь.
  • В поле Hint введите Отобразить справку.
  • В ImageIndex введите 7.
  • В Name введите HelpContents (для команды Помощь -> Содержание).

14. Щелкните правой кнопкой на Редакторе действий и выберите New Action.

15. В Инспекторе объектов установите следующие свойства:

  • Caption - &Индекс.
  • CategoryПомощь.
  • В поле Name введите HelpIndex (для Помощь -> Индекс).

16. Щелкните правой кнопкой на Редакторе действий и выберите New Action.

17. В Инспекторе объектов установите следующие свойства:

  • Caption установите в О &программе….
  • CategoryПомощь.
  • В поле Name запишите HelpAbout (меню Помощь -> О программе…).

Редактор действий пусть остается на экране.




 

Комментарии   

 
0 #1 Molier 17.02.2016 18:36
Но можно и записать в коде, например:
StatusBar1.SimpleText:= ‘untitled.txt’

а как именно и где что то не получается (и в конце наверное ставится ; да?)
Цитировать
 
 
+1 #2 Serge 19.02.2016 12:19
например, сразу после создания файла.
Цитировать
 
 
+1 #3 Saundra 16.05.2017 02:58
Hello i am kavin, its my first occasion to commenting anywhere, when i read this article i thought i could also make comment
due to this good paragraph.
Цитировать
 

Добавить комментарий


Защитный код
Обновить