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

ГОРЮ!!! Помогите, пожалуйста! Создание составных объектов.   Найти похожие ветки 

← →
Muzzy   (2002-05-13 07:18) [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

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


← →
KilkennyCat ©   (2002-05-14 12:12) [1]

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


← →
Mirovodin ©   (2002-05-14 20:29) [2]

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

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


← →
KaPaT ©   (2002-05-14 20:54) [3]

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


← →
Muzzy   (2002-05-15 07:04) [4]

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



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

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



Память: 0.46 MB
Время: 0.012 c
3-35542
Aleksandr
2002-08-21 14:26
2002.09.12
Как индексы в ClientDataSet сделать по убыванию?


1-35731
muler
2002-08-30 13:17
2002.09.12
создание индекса по нескольким полям


1-35644
zxas
2002-09-01 20:18
2002.09.12
Интересный вопрос !!!


3-35541
Oleg_EM
2002-08-21 15:27
2002.09.12
Вы будете смеяцца, но КАК перезапустить IB 5 ?


6-35834
MD
2002-07-08 08:41
2002.09.12
КаК закрыть ошибку ? HEEELP!




   Наверх