Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2002.09.12;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Media";
Текущий архив: 2002.09.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.008 c
1-35790
Егор
2002-08-27 15:33
2002.09.12
Почему я немогу найти спецпапку?


6-35832
Dmitry_Raduzhan
2002-07-06 16:16
2002.09.12
как получить список клиентов сервера


6-35847
HAspiring
2002-07-06 11:09
2002.09.12
Проверить соединен ли компьютер с интернетом


1-35650
DenKop
2002-08-29 16:17
2002.09.12
Как в WinXP выключить компьютер


3-35578
BoxTer
2002-08-21 20:48
2002.09.12
Eof & Bof (продолжение бадяги)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский