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

Вниз

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

 
Gayrus ©   (2003-03-05 03:32) [0]

В Form.OnPaint у меня написано следующее:
BeginPaint(MenuForm.Handle,ps);
glPushMatrix;
glClearColor(0,0,0,1);
glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);//- НЕ РАБОТАЕТ!!!
glCallList(MenuArr[ActivMenu]);
glFlush;
glPopMatrix;
SwapBuffers(MenuForm.h_dc);
EndPaint(Handle,ps);

If MenuForm.ControlCount>0 then begin
for I:=0 to MenuForm.ControlCount-1 do begin
( вызываю MenuForm.Paint; )
В Form.OnPaint у меня написано следующее:
BeginPaint(MenuForm.Handle,ps);
glPushMatrix;
glClearColor(0,0,0,1);
glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);//- НЕ РАБОТАЕТ!!!
glCallList(MenuArr[ActivMenu]);
glFlush;
glPopMatrix;
SwapBuffers(MenuForm.h_dc);
EndPaint(Handle,ps);

If MenuForm.ControlCount>0 then begin
for I:=0 to MenuForm.ControlCount-1 do begin
MenuForm.Controls[i].Repaint;
end;
end;



После прорисовки формы ( вызываю MenuForm.Paint; )все компоненты становяться невидимы! Если опсть вызвать MenuForm.Paint-видно, ещё раз опять не видно! Как сделать чтобы компоненты показывались всегда?


 
Gayrus ©   (2003-03-05 03:33) [1]

P.S. Не обращайте внимание на коментарий "//- НЕ РАБОТАЕТ!!!", это я для себя :)



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

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

Наверх




Память: 0.46 MB
Время: 0.012 c
1-24480
Zheks
2003-08-27 17:31
2003.09.08
Canvas


8-24559
nevalex
2003-05-09 20:21
2003.09.08
Эквалайзер......


3-24381
Alexei Sviridov
2003-08-15 02:31
2003.09.08
DBGrid


14-24679
Manfred
2003-08-20 22:22
2003.09.08
Сайт delphi.mastak.ru


6-24578
SKI
2003-07-04 20:18
2003.09.08
Сетевой трафик