![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Народ, я заочник, поэтому мягко сказать нуб пока, помогите если не трудно с контрольным заданием!!! Очень прошу
Модуль содержит описание типа-объекта TRect – прямоугольник. 1. Используя этот модуль, написать программу, изображающую на экране мигающий прямоугольник. Изменить модуль, объявив часть полей личными. 2. Написать свой модуль, в котором описать два новых объекта, наследующих от TRect : прямоугольник, способный случайным образом изменять размеры, цвет и стиль заполнения, и эллипс, обладаюший таким же поведением. Составить программу, изображающую на одной половине экрана мигающий прямоугольник, а на другой - мигающий эллипс. 3. Создать новый объект "Среда", который мог бы занимать весь экран или его часть и содержать внутри себя четыре объекта, вид объектов определяется случайно при инициализации среды из объектов, созданных в результате выполнения пункта 2. Объекты размещаются каждый в своем квадранте и при выполнении программы изменяют свои параметры. Буду вам премного благодарен! |
#2
|
|||
|
|||
![]() Ну и где этот модуль???
Кстати, TRect уже есть в Delphi, только это, если не ошибаюсь, запись, а не класс. |
#3
|
|||
|
|||
![]() Код:
|
#4
|
|||
|
|||
![]() А что это за старьё от TurboPascal???
Это все надо переписывать... |
#5
|
|||
|
|||
![]() Понимаю, но уж что дали, с преподом бесполезно спорить
![]() |
#6
|
|||
|
|||
![]() Дык не будет работать на Дельфи. Там таких модулей-то (Graph, Crt) больше нет.
|