На пространстве формы изображен...
Объекты TShape, TTimer на форме в Delphi.
Такое название для статьи я решил использовать, потому как все задачи, приведенные здесь, начинаются именно так…
Лабораторные работы по теме «Работа с объектами TShape, TTimer» подразумевают использование таймера Timer и изменение положения объектов Shape на форме с разной скоростью по разным траекториям. Органами управления, как правило, выступают командные кнопки Button, пункты главных MainMenu или контекстных PopupMenu меню.
Примеры приведены на Delphi, но переписать их на любой язык не составит труда…
Задачи лабораторных работ
На пространстве формы изображен календарь за {январь, февраль, март, апрель, май, июнь, июль, август, сентябрь, октябрь, ноябрь, декабрь} текущего года с {горизонтальным, вертикальным} расположением недель. Рамка {любого} цвета в виде квадрата с толщиной линии в {несколько} пикселей движется по датам с дискретом (интервалом) времени {несколько} сек. Запуск движения – кнопка «Пуск», остановка – кнопка «Стоп», что приводит к установке рамки на первую дату (вместо командных кнопок «Пуск» и «Стоп» могут использоваться пункты главных MainMenu или контекстных PopupMenu меню).
Рис.1 Управление командными кнопками или пунктами меню, контекстного меню
Если не удалось запустить видео, воспользуйтесь этой ссылкой ... видео на YouTube
Видео.1 управление пунктами контекстного меню
На пространстве формы изображена шахматная доска. Шашка {любого} цвета движется по периметру доски по {часовой или против часовой} стрелке с дискретом {несколько} сек. Запуск движения – команда главного меню, остановка – кнопка «Пуск», что приводит к установке шашки на левую верхнюю (или любую заданную) клетку.
На пространстве формы изображен квадрат размером 250х250. По часовой стрелке по периметру движется окружность диаметром 40 пикселей По верхней стороне движение идет со скоростью 200/сек. Далее на каждой стороне скорость уменьшается в два раза. Запуск движения – команда главного меню, остановка – кнопка «Пуск», что приводит к установке окружности в левый верхний угол квадрата. (понятно, что все размеры могут изменяться в других вариантах).
Рис.2 управление пунктами главного меню и командной кнопкой
Если не удалось запустить видео, воспользуйтесь этой ссылкой ... видео на YouTube
Видео.2 управление пунктами главного меню и командной кнопкой
На пространстве формы изображена окружность диаметром 300 пикселей. По ней против часовой стрелки движется окружность диаметром 40 пикселей со скоростью100/сек. Запуск и остановка движения – команды главного меню, что приводит к установке малой окружности в верхнюю точку большой окружности.
На пространстве формы изображена окружность диаметром 350 пикселей. Внутри ее, касаясь контура, по часовой стрелки движется окружность диаметром 40 пикселей со скоростью200/сек. Окружности разного цвета и толщины. Запуск движения – кнопка «Пуск», остановка – команда главного меню, что приводит к установке малой окружности в самое верхнее положение.
На пространстве формы изображен прямоугольник размером 250х300. Внутри его, касаясь контура, против часовой стрелки движется квадрат 30х30 пикселей со скоростью 200/сек. При смене направления меняется цвет квадрата. Запуск и остановка движения – команды главного меню, что приводит к установке квадрата в левый верхний угол.
Чтобы форма Shape стала прозрачной, установите в свойстве Brush(кисть) подсвойство Slyle (стиль) в значение bsClear... Окантовка чертится свойством Pen (выбирайте толщину пера и цвет)
Скачать первый ехе-файл для тестирования…
Скачать второй ехе-файл для тестирования…
А на FixPrice-1.htm этот исходный код открыт…
берите бесплатно…
Другие примеры на языке «Delphi»
Поделиться в соц сетях:
