Правка О программе Лабораторная работа №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) Проверьте работу проекта. Дополнительно (Это интересно!)
|