Вниз
Скачать: CL | DM;

Создание собственных объектов. HELP!!!   Найти похожие ветки 

← →
Muzzy   (2002-05-13 11:26) [0]

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

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


← →
cpp ©   (2002-05-13 14:52) [1]

Ну такое творчество в наши дни оплачивается звонкой монетой. Потому как Долго, хлопотно и не интересно. Поэтому видно и нет ответов.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.991 c
6-73320
Hecker
2002-02-09 01:10
2002.05.23
Кто знает как?


1-73188
rank
2002-05-13 05:29
2002.05.23
Как реализовать сортировку по алфавиту в Stringgride e


3-73013
ZDN
2002-04-26 08:44
2002.05.23
Как передать запись?


14-73363
Kozhanov
2002-04-15 11:24
2002.05.23
Поддержка программой нескольких языков


1-73291
Riko
2002-05-11 17:13
2002.05.23
Командная строка...




   Наверх