| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
DelphIX Как сделать чтоб для каждого спрайта была своя процедура? [Delphi, Windows]
GGG © (2005-11-04 22:31:00)У меня в программе нужно чтоб спрайт летел к координатам, на которых клацнул мышкой. А я когда клацаю, то угол поворота меняется не у одного спрайта а у всех. Как сделать чтоб процедура была одна, но после создания спрайта переменные в ней оставались старыми?
думаю вы поняли
GGG (2005-11-13 18:39:00) [21]Сенк! ща попробую!
а насчет TList... я был совсем в отчании :) и начал искать по инету куски кода который мог мне помочь, и наткнулся на такой способ с использованием TList только он нифига неработал:(
2Wish (2005-11-13 18:06:00) [22]Вобщем нужно добавить в класс TFireBall две переменные GoX и GoY а не в процедуру движения и вычислять эти GoY и GoX в момент создания самого спрайта, вот куски правильно кода:
type
TFireBall = class(TImageSprite)
protected
procedure DoMove(MoveCount: Integer); override;
private
gox,goy: extended;
end;
Procedure TFireball.DoMove(MoveCount: Integer);
begin
inherited DoMove(MoveCount);
x:=x+gox;
y:=y+goy;
end;
А вот это впихнуть в процедуру создания спрайта:
speedx:=3*cos((angle1)*pi/128);
speedy:=3*sin((angle1)*pi/128);
2Wish (2005-11-13 17:51:00) [23]Я уже нашел твою ошибку, ща выложу нормальный код, но можно поинтересоватся: а зачем при создании шара TList делать?
GGG (2005-11-13 16:07:00) [24]вот он на русском трафике webfile.ru/630160
GGG (2005-11-13 16:04:00) [25]кстати, извините что код такой запутанный, я аматор в программировании, и по проффесиональному строить его неумею
Signate (2005-11-13 16:02:00) [26]webfile.ru
GGG (2005-11-13 16:00:00) [27]
> Ссылка битая, выложи в где-нить другом месте.
просто это украинский банк файлов, может у тебя вол на Украину стоит?
скажи плиз какой-то русский банк файлов если можешь :)
2Wish (2005-11-13 15:45:00) [28]Ссылка битая, выложи в где-нить другом месте.
GGG (2005-11-13 14:35:00) [29]короче вот прога
нужно что б огненный шарики летел в сторону клика курсора,а после следующего клика он продолжал лететь куда и двигался сначала, но следующий шарик летел в сторону второго клика и т.д, и причем точно а не косо :), формула наверное у меня говенная))))
короче я сам не понял что написал, собсно вот сам код
http://files.adamant.ua/531
Жду помощи отцы))
Фео (2005-11-04 23:43:00) [30]для каждого спрайта сделай свои координаты...
JUS (2005-11-04 23:34:00) [31]Ну так и я про тоже... :-)))
Кефир87 (2005-11-04 23:26:00) [32]Да не надо кода. Тупит просто человек. У меня тоже такое бывает... Тем более использовать DelphiX не зная ООП очень тяжело...
JUS (2005-11-04 23:04:00) [33]
> Кефир87 © (04.11.05 23:03) [2]
> 0.0
> Сделать отдельный спрайт?!
Я примерно понял чё у него за проблема, пусть код выложит для наглядности
Кефир87 (2005-11-04 23:03:00) [34]0.0
Сделать отдельный спрайт?!
JUS (2005-11-04 22:49:00) [35]Скинь код, ато нифига непонятно, как тебе обьяснить!
| |
Страницы: 