Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.16;
Скачать: CL | DM;

Вниз

OpenGL - координаты   Найти похожие ветки 

 
Fynjy1984 ©   (2004-09-20 07:48) [0]

Помогите мне пожалуйста, мне нужно преобразовать координаты формы в координаты GL, т.е. я тыкаю мышью по форме там нарисован куб, мне надо узнать тыкнул ли я в куб (и куда именно) или мимо( выше, ниже, правее, левее). В примерах у Краснова смотрел - никак не разбирусь.


 
Jus   (2004-09-20 07:52) [1]

А ты следи за курсором мыши и тыкай в куб. Так и узнаеш ТЫКнул или неТЫКнул.:)


 
Jus   (2004-09-20 08:04) [2]

Var Kub_X,Kub_Y:integer; //координаты куба
   Kub_Width,Kub_Height:integer; //ширина и высота куба

В TForm1.OnMouseMove есть координаты мыши X и Y; напиши там
var XX,YY:integer;
Begin
XX:=X;
YY:=Y;
end;

TForm1.FormMouseDown
Begin
IF (XX>Kub_X) and (XX<Kub_X+Kub_Width) and (YY>Kub_Y) and (YY<Kub_Y+Kub_Height) then Caption:="ТЫКнул" else Caption:="не ТЫКнул";
end;

енто Я не уверен на счет когого куба но для квадрата подойдет:).


 
Jus   (2004-09-20 08:14) [3]


> Jus   (20.09.04 08:04) [2]

Извеняюсь)
Переменные XX и YY: integer; из onMouseMove сотри и запиши в VAR глобальные переменные.


 
Jus   (2004-09-20 08:16) [4]

Var Kub_X,Kub_Y:integer; //координаты куба
  Kub_Width,Kub_Height:integer; //ширина и высота куба
  XX,YY:integer; //вспомогательные координаты(координаты мыши)

В TForm1.OnMouseMove есть координаты мыши X и Y; напиши там
Begin
XX:=X;
YY:=Y;
end;

TForm1.FormMouseDown
Begin
IF (XX>Kub_X) and (XX<Kub_X+Kub_Width) and (YY>Kub_Y) and (YY<Kub_Y+Kub_Height) then Caption:="ТЫКнул" else Caption:="не ТЫКнул";
end;


 
cyborg ©   (2004-09-20 09:00) [5]

Jus он не про прамоугольник спрашивает, а про трёхмерный куб, успокойся ;)


 
Fynjy1984 ©   (2004-09-20 10:00) [6]

2 cyborg ©
Ты прав я спрашиваю про куб, наверное мне надо получить проекции по 3 осям, но как это сделать я не знаю.
И еще рисую я куб на интервале (-1;+1) а выводится он на всю форму, (0;400).


 
Jus   (2004-09-20 10:02) [7]


> Jus он не про прамоугольник спрашивает, а про трёхмерный
> куб, успокойся ;)

:-)


 
Fynjy1984 ©   (2004-09-23 09:58) [8]

отклинитесь !!!!!!!!!!!!!!!!!!!!!!!


 
Fynjy1984 ©   (2004-09-23 09:58) [9]

отклинитесь !!!!!!!!!!!!!!!!!!!!!!!


 
NikeOLD ©   (2004-09-23 12:15) [10]

У Краснова все есть посмотри еще разок, начиная с самых протейших.
Если вопросы останутся дай знать, что конкретно тебе не понятно.



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

Текущий архив: 2005.01.16;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.024 c
1-1103988207
begin...end
2004-12-25 18:23
2005.01.16
Виртуальный ListView


1-1104723673
saimon
2005-01-03 06:41
2005.01.16
Про компилятор дельфи. Помогите...


1-1104068297
Leksey
2004-12-26 16:38
2005.01.16
Устал, помогите, сдаюсь, как скрыть системный фокус приложения ?


1-1104669867
lipskiy
2005-01-02 15:44
2005.01.16
Подскажите по инсталляции свой программы для всех пользователей


3-1102789459
Dell3r
2004-12-11 21:24
2005.01.16
Сетевая многопользовательская программа