Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ГОРЮ!!! Помогите, пожалуйста! Создание составных объектов. [D3, D4, D5, D6, Win95/98, WinME, Win2k]


Muzzy ©   (2002-05-13 07:18:00) 

Здравствуйте, уважаемые мастера!
Срочно нужна Ваша помощь! Просьба не отсылать копаться в архивах и не сетовать на «тупость» за элементарный вопрос. Просто ГОРЮ!!! Скоро сессия (через 7 дней), а курсовая неготовая!

Вопрос:

Нужно описать объект (предположим TSamoletik), в котором внутри находится TAnimate с FileName:=’samoletik_letit.avi’.
1. Рождать от него объекты (т.е.потомки Create)
2. По событию (при рождении, предположим TSamoletik. CreateSamoletik(“передается случайное Y»:integer)) он создается за пределами формы, и пролетает по ней (по оси Y), скрываясь за границей Left формы, после чего сам Уничтожается.
3. По событию TSamoletik.Killed меняет в Animate1.FileName:="samoletik_killed.avi", проигрывает его и тоже уничтожается
4. Движется сам по заданной Y (не контролируя)

Смысл в том чтобы нарожать сколько нужно самолетиков, чтобы они сами летели, и сбивать их.

Если можно не кусочек кода, а полностью модуль (.pas), если возможно (чтоб было понятно).
Можно на EMail: muzzy@mailru.com

Если поможете буду очень признателен!!!
Заранее большое спасибо!


Muzzy   (2002-05-15 07:04:00) [1]

Так вот именно - идти то некуда!
Ладно, я уже сам разобрался.


KaPaT   (2002-05-14 20:54:00) [2]

>Если можно не кусочек кода, а полностью модуль (.pas), если >возможно (чтоб было понятно).
....
хех...совет...идешь в первую же общагу своего заведения...трясешь деньгами...через пару часов можешь идти опять в опщагу и забирать свой курсовик....хех


Mirovodin   (2002-05-14 20:29:00) [3]

2 KilkennyCat Присоединяюсь к вам, но снижу цену до 10$.

Вообще обидно, что настоящие программисты вынуждены обучаться в совершенно не соответствующих их увлечению вузах, а вот такие люди занимают эти места...


KilkennyCat   (2002-05-14 12:12:00) [4]

Замечательно!
Я могу сделать за Вас эту курсовую, думаю, пару часов на это выделить можно... 50 баксов.
И вопрос: Вы собираетесь стать программистом?!


Наверх

Титульная страница Поиск, карта сайта Написать письмо