![]() Главная страница Случайная страница Разделы сайта АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Использование буфера обмена (объект Clipboard)
SetText записывает копию текста в буфер обмена GetText возвращает копию текста из буфера обмена SetData записывает копию выбранного рисунка в буфер обмена GetData возвращает содержимое буфера обмена (копию рисунка) GetFormat определяет, является содержимое буфера обмена текстовым или графическим Clear стирает содержимое буфера обмена
События клавиатуры и мышки
Событием называется характеристика класса объектов, описывающая внешнее воздействие, на которое реагирует объект этого класса во время работы приложения.
События, возникающие при работе с мышью
События, возникающие при работе с клавиатурой
События, связанные с фокусом
Объект, имеющий фокус, может получать вводимую пользователем информацию с помощью мыши и клавиатуры.
Лабораторно-практические работы ЛАБОРАТОРНО-ПРАКТИЧЕСКАЯ РАБОТА № 1 Тема: События мышки Цель: Получить навыки использования событий MouseMove Порядок выполнения 10. Установите на форме следующие объекты и измените им свойства:
11. В окне кода процедуры обработки события MouseMove для объекта Form набрать Form1.Caption = " Координаты курсора " + Str(X) + " " + Str(Y) If Button = 0 Then Label1.Caption = " Движение мышки по форме" End If If Button = 1 Then Label1.Caption = " Движение мышки по форме, нажата левая кнопка мышки" End If If Button = 2 Then Label1.Caption = " Движение мышки по форме, нажата правая кнопка мышки" End If If Shift = 1 Then Label1.Caption = " Движение мышки по форме, нажата Shift" End If If Shift = 2 Then Label1.Caption = " Движение мышки по форме, нажата Ctrl" End If If Shift = 4 Then If Shift = 1 Then Label1.Caption = " Движение мышки по форме, нажата Shift" End If End If 12. В окне кода процедуры обработки события MouseMove для объекта Label1 набрать Забиваем Сайты В ТОП КУВАЛДОЙ - Уникальные возможности от SeoHammer
Каждая ссылка анализируется по трем пакетам оценки: SEO, Трафик и SMM.
SeoHammer делает продвижение сайта прозрачным и простым занятием.
Ссылки, вечные ссылки, статьи, упоминания, пресс-релизы - используйте по максимуму потенциал SeoHammer для продвижения вашего сайта.
Что умеет делать SeoHammer
— Продвижение в один клик, интеллектуальный подбор запросов, покупка самых лучших ссылок с высокой степенью качества у лучших бирж ссылок. — Регулярная проверка качества ссылок по более чем 100 показателям и ежедневный пересчет показателей качества проекта. — Все известные форматы ссылок: арендные ссылки, вечные ссылки, публикации (упоминания, мнения, отзывы, статьи, пресс-релизы). — SeoHammer покажет, где рост или падение, а также запросы, на которые нужно обратить внимание. SeoHammer еще предоставляет технологию Буст, она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней. Зарегистрироваться и Начать продвижение Label1.Caption = " Движение мышки по метке" 13. Проверьте работу программы
|