Суббота, 01.08.2026, 02:02
Главная
Регистрация
Вход
9-B Form
Приветствую Вас Школяр | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 2
  • 1
  • 2
  • »
Кодим вместе!!! GLScene
ФедяДата: Воскресенье, 09.12.2007, 23:06 | Сообщение # 1
I класс
Группа: Пользователи
Сообщений: 2
Репутация: 0
Статус: Offline
GLScene - прикольный граф-движок.
Удобный, быстрый, но к сожалению не все работает правильно. cry
Давайте исправим!!!

Добавлено (09.12.2007, 23:06)
---------------------------------------------
если кто не знаком с ГЛС, милости просим сюда

 
X-boyДата: Четверг, 13.12.2007, 19:35 | Сообщение # 2
Танцующий с тенями
Группа: Админ
Сообщений: 1822
Репутация: 14
Статус: Offline
РАдера на сайте нету...

Не верь, не бойся, не проси...
В мире 6 миллиардов человек, из них 50% спят, 20% смотрят TV, 20% работают, 5% занимаются сексом...
и только один идиот читает мою инфу

 
KOL_93Дата: Пятница, 14.12.2007, 00:04 | Сообщение # 3
I класс
Группа: Пользователи
Сообщений: 3
Репутация: 0
Статус: Offline
ну и что, что нету.
ЧЁ прогеров больше не существует?
Ты кто вообще?

Добавлено (14.12.2007, 00:00)
---------------------------------------------
если кому надо, я сейчас добавлю 2 процедуры:
1: повернуть обьект вокруг родителя(в системе координат родителя) на заданые углы поворота вокруг осей:

Code

procedure TGLBaseSceneObject.MoveArround(pD,tD,rD : Single);
const AR:TAffineVector=(1,0,0);
       AU:TAffineVector=(0,1,0);
       AD:TAffineVector=(0,0,1);
var sp,cp,st,ct,sr,cr,l:Single;
   TRT:TProgressTimes;

begin
   SinCos(DegToRad(pD),sp,cp);
   SinCos(DegToRad(tD),st,ct);
   SinCos(DegToRad(rD),sr,cr);
   l:=Sqrt(Sqr(FPosition.X)+Sqr(FPosition.Y)+Sqr(FPosition.Z));
   Self.FIsCalculating:=True;
   with FDirection do
   begin
       SetVector(x,y*cp-z*sp,y*sp+z*cp);
       SetVector(x*ct+z*st,y,-x*st+z*ct);
       SetVector(x*cr-y*sr,x*sr+y*cr,z);
   end;
   with FUp do
   begin
       SetVector(x,y*cp-z*sp,y*sp+z*cp);
       SetVector(x*ct+z*st,y,-x*st+z*ct);
       SetVector(x*cr-y*sr,x*sr+y*cr,z);
   end;
   with FPosition do
   begin
       SetPoint(x,y*cp-z*sp,y*sp+z*cp);
       SetPoint(x*ct+z*st,y,-x*st+z*ct);
       SetPoint(x*cr-y*sr,x*sr+y*cr,z);
   end;
   FRotation.X:=Frac((FRotation.X+pD+180)/360)*360-180;
   FRotation.Y:=Frac((FRotation.Y+tD+180)/360)*360-180;
   FRotation.Z:=Frac((FRotation.Z+rD+180)/360)*360-180;
   Self.FIsCalculating:=False;
   TransformationChanged;

end;

2. повернуть камеры вокруг своих координат(в системе глобальных координат) на заданые углы поворота вокруг осей:
Code

procedure TGLBaseSceneObject.CameraArround(pD,tD,rD : Single);
var sp,cp,st,ct,sr,cr,l:Single;
DVO,UVO,RVO,PVO:TAffineVector;
begin
   SinCos(DegToRad(pD),sp,cp);
   SinCos(DegToRad(tD),st,ct);
   SinCos(DegToRad(rD),sr,cr);
   DVO:=FDirection.AsAffineVector;
   UVO:=FUP.AsAffineVector;
   RVO:=VectorCrossProduct(DVO,UVO);
   PVO:=FPosition.AsAffineVector;
   l:=Sqrt(Sqr(FPosition.X)+Sqr(FPosition.Y)+Sqr(FPosition.Z));
   Self.FIsCalculating:=True;
   FPosition.Rotate(RVO,DegToRad(pD));
   FPosition.Rotate(UVO,DegToRad(tD));
   FPosition.Rotate(DVO,DegToRad(rD));
   FDirection.Rotate(RVO,DegToRad(pD));
   FDirection.Rotate(UVO,DegToRad(tD));
   FUp.Rotate(RVO,DegToRad(pD));
   FUp.Rotate(DVO,DegToRad(rD));
   Self.FIsCalculating:=False;
   TransformationChanged;

end;

Добавлено (14.12.2007, 00:04)
---------------------------------------------
есди кому что надо, писать сюда!

 
X-boyДата: Пятница, 14.12.2007, 07:20 | Сообщение # 4
Танцующий с тенями
Группа: Админ
Сообщений: 1822
Репутация: 14
Статус: Offline
Кинь сюда плс Кодер..

Не верь, не бойся, не проси...
В мире 6 миллиардов человек, из них 50% спят, 20% смотрят TV, 20% работают, 5% занимаются сексом...
и только один идиот читает мою инфу

 
Lady-kittyДата: Понедельник, 17.12.2007, 14:49 | Сообщение # 5
VII класс
Группа: Проверенные
Сообщений: 1332
Репутация: 8
Статус: Offline
ой, я не туда попала))) Програмеры хреновы)) вы бы лучше програмку взломщик для веб-мани написали)) biggrin

наш девиз непобедим! возбудим и не дадим=)
 
X-boyДата: Понедельник, 17.12.2007, 20:01 | Сообщение # 6
Танцующий с тенями
Группа: Админ
Сообщений: 1822
Репутация: 14
Статус: Offline
такое невозможно создать

Не верь, не бойся, не проси...
В мире 6 миллиардов человек, из них 50% спят, 20% смотрят TV, 20% работают, 5% занимаются сексом...
и только один идиот читает мою инфу

 
Lady-kittyДата: Вторник, 18.12.2007, 16:33 | Сообщение # 7
VII класс
Группа: Проверенные
Сообщений: 1332
Репутация: 8
Статус: Offline
X-boy, обломись) ВоЗМОЖНО! Я в инете читала, что какие-то умники баннеры левые на сайт поместили, по ним кликаешь и тебя перед тем как тправить на нормальный сайт на доли секунды переадресовывает на левый, и в комп загружается програма шпион. Потом програма тырит все пароли и получает доступ к твоим ресурсам, в том числе и к веб-мани, а твой доступ туда блочит. ВОТ! Умники за пол часа полтора миллиона баксов сшибли, а кто - найти не могут!

наш девиз непобедим! возбудим и не дадим=)
 
NoxДата: Вторник, 18.12.2007, 18:52 | Сообщение # 8
Злобный модер
Группа: Проверенные
Сообщений: 1714
Репутация: -49
Статус: Offline
и шо?сшибали и больше за пол часа в истории человечества

Свой девиз произведём:заведём и не введём!
 
LegolasДата: Вторник, 18.12.2007, 20:48 | Сообщение # 9
Авторитет
Группа: Модераторы
Сообщений: 1752
Репутация: 12
Статус: Offline
За минуты сшибали столько,что мы даже на картинках не видели ...

<i>невидимка<i>

 
Lady-kittyДата: Среда, 19.12.2007, 19:16 | Сообщение # 10
VII класс
Группа: Проверенные
Сообщений: 1332
Репутация: 8
Статус: Offline
Legolas, Интересно кто)))

наш девиз непобедим! возбудим и не дадим=)
 
NoxДата: Среда, 19.12.2007, 21:33 | Сообщение # 11
Злобный модер
Группа: Проверенные
Сообщений: 1714
Репутация: -49
Статус: Offline
тебе скажи

Свой девиз произведём:заведём и не введём!
 
X-boyДата: Четверг, 20.12.2007, 15:19 | Сообщение # 12
Танцующий с тенями
Группа: Админ
Сообщений: 1822
Репутация: 14
Статус: Offline
Quote (Lady-kitty)
обломись) ВоЗМОЖНО

Это твои любимые слова:?


Не верь, не бойся, не проси...
В мире 6 миллиардов человек, из них 50% спят, 20% смотрят TV, 20% работают, 5% занимаются сексом...
и только один идиот читает мою инфу

 
Lady-kittyДата: Четверг, 20.12.2007, 16:50 | Сообщение # 13
VII класс
Группа: Проверенные
Сообщений: 1332
Репутация: 8
Статус: Offline
X-boy, ага) Как ты догадался?

наш девиз непобедим! возбудим и не дадим=)
 
X-boyДата: Четверг, 27.12.2007, 17:25 | Сообщение # 14
Танцующий с тенями
Группа: Админ
Сообщений: 1822
Репутация: 14
Статус: Offline
Ну...путём несложных умозаключений и дедукции на основе имеющихся фактов, сразу становится понятно, что..

Не верь, не бойся, не проси...
В мире 6 миллиардов человек, из них 50% спят, 20% смотрят TV, 20% работают, 5% занимаются сексом...
и только один идиот читает мою инфу

 
Lady-kittyДата: Четверг, 27.12.2007, 21:29 | Сообщение # 15
VII класс
Группа: Проверенные
Сообщений: 1332
Репутация: 8
Статус: Offline
X-boy, Будь попроще и люди к тебе потянутся))

наш девиз непобедим! возбудим и не дадим=)
 
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:


| Copyright MyCorp © 2026 | |