Вниз
Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.014 c
1-24460
SPIRIT
2003-08-28 08:55
2003.09.08
Гавной форму сделать другую


3-24334
Rel_
2003-08-18 12:16
2003.09.08
запрос


3-24320
DelphiNew
2003-08-19 12:54
2003.09.08
Поиск при вводе


6-24598
ASTARD
2003-07-02 21:51
2003.09.08
У меня еще вопрос по поводу ПОП3?


1-24535
VISA
2003-08-26 13:00
2003.09.08
Запрет максимизации окна...




   Наверх