Правка О программе

Лабораторная работа №5

Вырезать

Копировать

Вставить

-

Найти

c) Поместите на форму компонент ToolBar, который будет необходим для создания панели инструментов. С помощью команд New Button и New Separator из контекстного меню данного компонента, оформите панель инструментов данного проекта (без помещения на кнопки рисунков);

d) Для размещения на кнопках панели инструментов рисунков поместите на форму компонент ImageList (страница Win32 палитры компонентов). Войдите в редактор данного компонента, вызвав команду ImageList Editor из контекстного меню ImageList. Добавьте в редактор ImageList файлы рисунков. Осуществите связь ToolBar c ImageList посредством свойства Images компонента ToolBar.

e) Формат шрифта текста (в том числе выделенного) компонента RichEdit будем менять с помощью компонента FontDialog (страница Dialogs). Поместите данный компонент на форму. Обработайте событие OnClick для меню Формат/Шрифт следующим образом:

{если в диалоговом окне выбраны параметры шрифта и нажата

кнопка OK, то}

if FontDialog1.Execute then

{параметры, выбранные в FontDialog, присваиваем RichEdit}

RichEdit1.SelAttributes.Assign(FontDialog1.Font);

RichEdit1.SetFocus;

f) По нажатию на команду меню «О программе», должно появляться окно, содержащее информацию о проекте, для этого:

· Выберите команду File/ New/ Other;

· В появившемся окне New Items на закладке Forms выберите About box;

· Сохраните модуль формы в папке “Блокнот”;

· Оформите элементы формы по вашему усмотрению;

· В обработке события OnClick по команде Справка введите AboutBox.Show;

· В модуле формы “Блокнот” внесите в раздел uses имя модуля формы About box;

g) Работа с буфером обмена производиться с помощью методов компонента RichEdit. Обработайте событие OnClick для меню Правка/Копировать следующим образом:

{копируем выделенный фрагмент в буфер обмена}

RichEdit1.CopyToClipboard;

{снимаем выделение фрагмента}

RichEdit1.HideSelection:= true;

h) Обработайте событие OnClick для меню Правка/Вставить следующим образом:

RichEdit1.PasteFromClipboard;

i) Обработайте событие OnClick для меню Правка/Вырезать следующим образом:

RichEdit1.CopyToClipboard;

RichEdit1.ClearSelection;

j) Реализацию меню Правка/Найти осуществить в соответствие с примером из справки по методу FindText. Поместите на форму компонент FindDialog;

k) Реализацию обработки щелчка по кнопкам панели инструментов провести с помощью процедур обработки щелчка по соответствующим командам меню;

l) Проверьте работу проекта.

Дополнительно (Это интересно!)