 |
АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция
If SaveDialog.Execute Then
Begin
Memo.Lines.SaveToFile(SaveDialog.FileName);
Memo.Modified:= false;
end;
5. Використовуючи Інспектор об’єктів, поставте у відповідність кнопкам швидкого доступу на панелі інструментів написані процедури оброблення команд Open і Save.
6. Напишіть процедуру оброблення для пункту меню Exit, вона складається з виклику одного методу Close;
7. Для процедури оброблення пункту меню Cut введіть Memo.CutToClipboard; для Copy введіть Memo.CopyToClipboard; для Paste введіть Memo.PasteFromClipboard; для Select All введіть Memo.SelectAll;
8. Збережіть проект (File → Save All). Запустіть додаток і вивчіть його властивості.
Крок 3. Створення вікна About. Вікно About містить стислу інформацію про додаток (назву, версію програми, ім’я розробника, відомості про авторські права, а також значок додатка). Вікно About звичайно має одну кнопку – Ok.
1. Згенеруйте процедуру оброблення пункту About меню Help і введіть туди наступний код: AboutBox.ShowModal;
ShowModal – метод відображення на екрані модального вікна. Модальним називається вікно, що дозволяє продовжити роботу з додатком тільки після свого закриття.
2. Створіть нову форму для діалогового вікна About (для цього натисніть кнопку New Form на панелі інструментів). Збережіть модуль з ім’ям About.
3. Зменште розмір нової форми до розмірів типового вікна About. Змініть ім’я нової форми на AboutBox, заголовок (Caption) на ‘ Про програму… ’
4. Властивість BorderStyle установіть в bsDialog (це зробить неможливим зміну розмірів вікна).
5. Розташуйте на формі кілька текстових міток Label (палітра Standard) і введіть у них необхідні відомості про програму (для зміни шрифту використовуйте властивість Font компонента Label).
6. Розташуйте на формі (ліворуч від тексту) компонент Image (палітра Additional). Використовуючи кнопку “…” властивості Picture завантажте іконку додатка (папка \Program Files\ Common Files\ Borland Shared\ Images\ Icons). Розташуйте іконку належним чином.
7. Розташуйте на формі About кнопку BitBtn (палітра Additional). Властивість Kind кнопки установіть у bkOk. Для кнопки BitBtn не треба писати процедуру оброблення – вона вже містить у собі код закриття форми.
8. Останньою рисою в оформленні вікна About може стати розташування на формі компонента Bevel (палітра Additional). Обведіть за допомогою Bevel рядки тексту – це придасть формі об’ємний вигляд. Властивість Shape змініть на bsFrame.
9. Для того, щоб викликати вікно About із головного модуля необхідно в рядок Uses додати ім’я модуля About. Це можна зробити й автоматично: у головному модулі програми виберіть у меню File пункт Use Unit і натисніть ліву кнопку миші у діалоговому вікні на модулі About.
Поиск по сайту: