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

Вниз

Вращение объектов (шара вокруг своей оси)   Найти похожие ветки 

 
Сергей   (2010-03-22 22:55) [0]

Подскажите как сделать вращающийся шар вокруг своей оси! Если можно то реально для чайников, а не часть кода!


 
AntonioBanderas   (2010-03-22 23:43) [1]

var
 x: Integer=0;

````````````````````````````````````````

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 x:= x+0.1;
 Shape1.Left := 265+trunc(150*cos(x));
 Shape1.Left := 150-trunc(150*sin(x));
end;


 
AntonioBanderas   (2010-03-22 23:44) [2]


> Shape1.Left := 150-trunc(150*sin(x));

ой т.е. тут Shape1.Top := 150-trunc(150*sin(x));


 
Германн ©   (2010-03-23 01:30) [3]


> AntonioBanderas

:)


 
12 ©   (2010-03-23 08:57) [4]

вращение шара?
или я чего не понимаю, или Shape1.Left := Shape1.Left
равно как и остальное Shape1.ххх


 
DrPass ©   (2010-03-23 10:23) [5]


> Сергей   (22.03.10 22:55) 
> Подскажите как сделать вращающийся шар вокруг своей оси!
>  Если можно то реально для чайников, а не часть кода!

Если в твоей модели отсутствуют источники света, а шар одноцветный, то можешь не заморачиваться - все равно никто не поймет, вращается он или стоит на месте.


 
oldman ©   (2010-03-23 10:50) [6]

если шар одноцветный, то и на источник света можно забить.


 
Дмитрий Белькевич   (2010-03-23 11:02) [7]


> если шар одноцветный, то и на источник света можно забить.


Если шар полностью прозрачный, то можно и на источник света и на сам шар забить.


 
DrPass ©   (2010-03-23 12:00) [8]

Проще всего вращать шар с нулевым радиусом


 
AntonioBanderas   (2010-03-23 12:11) [9]

проше нарисовать 10 имагов, а чем больше тем лучше качество ;) и менять их по очериди, и даже скорость можно регулировать таймером


 
DrPass ©   (2010-03-23 12:14) [10]


> проше нарисовать 10 имагов, а чем больше тем лучше качество
> ;) и менять их по очериди, и даже скорость можно регулировать
> таймером

Говорят, примерно так Джеймс Камерон делал свой "Аватар"


 
Омлет ©   (2010-03-23 12:33) [11]

http://www.delphisources.ru/pages/sources/graph/2007_year/opengl_rotating_globe.html


 
Б   (2010-03-23 12:39) [12]

Тут двойная буфферизация и вращение по окружности:
http://subscribe.ru/archive/comp.soft.prog.delphiprogr/200712/14121853.html


 
Сергей   (2010-03-27 17:42) [13]

Всем большое спасибо я разобрался



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

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

Наверх





Память: 0.47 MB
Время: 0.067 c
2-1270922444
Evgeney
2010-04-10 22:00
2010.08.27
Процедура для открытия Child форм


2-1269947335
Delphist2
2010-03-30 15:08
2010.08.27
EDatabaseError


15-1273573286
Дмитрий Белькевич
2010-05-11 14:21
2010.08.27
Возможно ли доступиться из JavaScript к OLE интерфейсам?


15-1272623750
Гость
2010-04-30 14:35
2010.08.27
VS .NET, Winforms


15-1271958315
TUser
2010-04-22 21:45
2010.08.27
Оппозиции на заметку





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский