Вниз
Скачать: CL | DM;

OpenGL   Найти похожие ветки 

← →
X-RayMan   (2004-09-29 22:53) [0]

Привет олл!

У меня есть вопрос по сабжу. Есть анимация вращающейся Земли (Краснов. OpenGL графика в проектах Delphi. Глава 4, пример 89). По идее точки с преобладанием синего цвета должны быть полупрозрачными. Флаги в описании формата пиксела: pfd_SUPPORT_OpenGL or pfd_Draw_To_Window. Если к этому добавить or pfd_DoubleBuffer - анимация идет нормально, но точки не прозрачные. Если еще добавить or pfd_SUPPORT_GDI, то точки прозрачны, но анимация мигает.
Может кто знает, что надо сделать, чтобы и не мигало и было прозрачным. Заранее спасибо...

P.S. Пример можно скачать на http://d3dengine.narod.ru/books.html. Там есть ссылка - скачать дискету к книге.


← →
X-RayMan   (2004-09-30 00:23) [1]

Что-то я свое мыло в прошлой мессаге не правильно написал...


← →
WondeRu ©   (2004-09-30 09:50) [2]

?не  знай? у меня вообще прозрачности нет при любых флагах! еще совет: переделай процедуру инициализации - работать быстрее будет.
procedure TfrmGL.Init;
const
LightPos : Array [0..3] of GLFloat = (10.0, 10.0, 0.0, 1.0);
var
Quadric : GLUquadricObj;
begin
Quadric := gluNewQuadric;
gluQuadricTexture (Quadric, TRUE);

glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);

glEnable(GL_TEXTURE_2D);

glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
prepareImage ("earth.bmp");//вынес из дисплейного списка

glNewList (Earth, GL_COMPILE);
   glEnable (GL_BLEND);
   glEnable(GL_CULL_FACE);
   glCullFace(GL_FRONT);
   gluSphere (Quadric, 1.0, 24, 24);
   glCullFace(GL_BACK);
   gluSphere (Quadric, 1.0, 24, 24);
   glDisable(GL_CULL_FACE);
   glDisable (GL_BLEND);
glEndList;

gluDeleteQuadric (Quadric);

glEnable(GL_DEPTH_TEST);
end;



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c
1-1102528398
Leaner
2004-12-08 20:53
2004.12.26
Присоединение к проекту файла: *tlb


1-1102691955
Аня
2004-12-10 18:19
2004.12.26
конвертирование отчетов Rave


14-1102498783
Delphin
2004-12-08 12:39
2004.12.26
Умер комп


14-1102340478
msguns
2004-12-06 16:41
2004.12.26
Кто похвалит себя лучше всех


1-1102669756
korvin
2004-12-10 12:09
2004.12.26
Форма не держится "сверху"




   Наверх