Страницу Назад
Поискать другие аналоги этой работы
50 Алгоритмические языки и программирование. Лабораторная работа №2. Вариант № 4ID: 92294Дата закачки: 25 Февраля 2013 Продавец: andreyka1486 (Напишите, если есть вопросы) Посмотреть другие работы этого продавца Тип работы: Работа Лабораторная Форматы файлов: Microsoft Office Сдано в учебном заведении: СибГУТИ Описание: ЛАБОРАТОРНАЯ РАБОТА 2 Тема: Определение нажатой клавиши и нажатого символа. Цель работы: Ознакомиться с основными клавиатурными событиями визуальных компонентов. Задание 1. Выполните следующие действия Разместите на форме 6 объектов типа Label и одну кнопку с растровым изображением (компонент BitBtn на закладке Additional палитры компонентов). Установите у кнопки свойство Kind равным bkClose. Тогда при нажатии на эту кнопку приложение будет закрываться. При создании одинаковых по размеру объектов пользуйтесь буфером обмена или командой Edit → Size. Для выравнивания положения объектов на форме используйте команду Edit → Align. Для всех объектов типа Label установить свойство AutoSize равным False, свойство Aligment – taCenter. Для меток слева установите нужные свойства Caption, Font. Для меток справа удалите свойство Caption, измените свойство Font по своему усмотрению. Для всех объектов типа ТLabel оформите границы, используя такие декоративные элементы, как фаски (компонент ТBevel на закладке палитры компонентов Additional). У объектов типа ТBevel установите значения свойств Shape и Style. В результате окно будет выглядеть примерно так Image145.gif Рисунок 2.1 Примерный вид окна Установите для формы значение свойства KeyPreview равным True для того, чтобы форма могла обрабатывать события для клавиатуры. В процедуре обработки события OnKeyDown для формы необходимо выполнить следующие действия. Показать значение переменной Key (код виртуальной клавиши) в качестве нажатой клавиши. Для преобразования кода в строковую переменную используйте функцию IntToStr. Проверить были ли нажаты клавиши Shift, Alt, Ctrl (принадлежат ли элементы ssShift, ssAlt, ssCtrl множеству Shift, которое передаётся процедуре в качестве параметра). Создать строку из комбинации нажатых клавиш (например, Shift+Alt+Ctrl, если были нажаты все три клавиши) и поместить её на форму в соответствующее место. Например, для проверки нажатия клавиши Alt можно использовать следующий код procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if ssAlt in Shift then Label6.Caption:= \'Alt\'; end; Процедура обработки события OnKeyPress получает значение параметра Key, равное символу ASCII. Для отображения символа в объекте Label2 используйте Label2.Caption:= Key. В процедуру обработки события формы OnKeyUp добавьте операторы очистки заголовков объектов типа Label из среднего столбца. Например, Label2.Caption:= \'\'. При нажатии клавиши с буквой A (англ. раскладка) будет отображаться нажатый символ «а» и код нажатой клавиши 65. Image147.gif Рисунок 2.2 Работа приложения При нажатии комбинации клавиш Shift + A (англ. раскладка) будет отображаться нажатый символ «A», код нажатой клавиши 65 и название клавиши Shift. Image148.gif Рисунок 2.3 Работа приложения Задание 2. Добавьте на форму еще один компонент ТLabel. При нажатии определенной комбинации клавиш в метке должны появляться название группы и фамилия студента. Комбинация клавиш выбирается по последней цифре шифра студента. Alt + 5 Комментарии: В файле находятся отчет в ворде и отдельно сам исполняющий файл Делфи. Внимание - после скачивания следует изменить мою фамилию на Вашу фамилию. Операция эта занимает не более минуты. Работа выполнена качественно и сдана с первого раза! Размер файла: 665,7 Кбайт Фаил: 
(.rar)
------------------- Обратите внимание, что преподаватели часто переставляют варианты и меняют исходные данные! Если вы хотите, чтобы работа точно соответствовала, смотрите исходные данные. Если их нет, обратитесь к продавцу или к нам в тех. поддержку. Имейте ввиду, что согласно гарантии возврата средств, мы не возвращаем деньги если вариант окажется не тот. -------------------
Скачано: 1 Коментариев: 0 |
||||
Есть вопросы? Посмотри часто задаваемые вопросы и ответы на них. Опять не то? Мы можем помочь сделать! |
||||
Вход в аккаунт:
Страницу Назад
Cодержание / Программирование / Алгоритмические языки и программирование. Лабораторная работа №2. Вариант № 4
Вход в аккаунт: