Студопедия

Главная страница Случайная страница

Разделы сайта

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






  • Сервис онлайн-записи на собственном Telegram-боте
    Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое расписание, но и напоминать клиентам о визитах тоже. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
    Для новых пользователей первый месяц бесплатно.
    Чат-бот для мастеров и специалистов, который упрощает ведение записей:
    Сам записывает клиентов и напоминает им о визите;
    Персонализирует скидки, чаевые, кэшбэк и предоплаты;
    Увеличивает доходимость и помогает больше зарабатывать;
    Начать пользоваться сервисом
  • Picture1.Line (x4, y4)-(x1, y1)






    X0 = x1

    Y0 = y1

    x1 = x1 + (x2 - x1) * k

    y1 = y1 + (y2 - y1) * k

    x2 = x2 + (x3 - x2) * k

    y2 = y2 + (y3 - y2) * k

    x3 = x3 + (x4 - x3) * k

    y3 = y3 + (y4 - y3) * k

    x4 = x4 + (X0 - x4) * k

    y4 = y4 + (Y0 - y4) * k

    6. Проверьте работу программы, выполняя многократное нажатие кнопки «Нарисуй»

    7. Измените у формы свойство DrawWidth (увеличьте значение). Просмотрите работу программы

    8. Добавьте на форму еще две командные кнопки, одна из которых выполняет функцию очистки графического окна, другая позволяет восстановить размеры исходного квадрата. Результаты работы своей программы сравните с образцом.

    9. Самостоятельно разработать программу, которая начертить узор, описанный в постановке задачи, но составленный из а) треугольников; б) пятиугольников; в) шестиугольников

    Часть

    10. Откройте новый проект.

    11. Установите на форме следующие объекты и измените им свойства:

    Объект Свойство Значение
    Командные кнопки Name CmdStart
    Caption Старт
    Name CmdStop
    Caption Стоп
    Таймер Name Timer1
    Форма DrawWidth  

     

    12. В окне кода процедуры обработки события Timer для объекта Timer1 набрать

    Dim x, y

    Dim R, G, B

    x = Form1.ScaleWidth * Rnd()

    y = Form1.ScaleHeight * Rnd()

    R = Int(256 * Rnd())

    G = Int(256 * Rnd())

    B = Int(256 * Rnd())

    Form1. PSet (x, y), RGB(R, G, B)

    13. Самостоятельно набери программный код для командных кнопок, одна из них должна включать таймер, другая – останавливать.

    14. Результат показать преподавателю.


    ЛАБОРАТОРНО-ПРАКТИЧЕСКАЯ РАБОТА № 10

    Тема: Условный оператор. Графические методы

    Цель: Закрепить навыки использования условного оператора и графических методов

    Постановка задачи: Разработать приложение, имитирующее работу часов с минутной и секундной стрелками






    © 2023 :: MyLektsii.ru :: Мои Лекции
    Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав.
    Копирование текстов разрешено только с указанием индексируемой ссылки на источник.