第三、准备好窗口。
如果使用Aux/Glut/VCL则可免去这一步。
如果在窗口系统中使用OpenGL则必须给窗口加上WS_CLIPCHILDREN和 WS_CLIPSIBLINGS两个属性,否则只能得到黑屏。
在BCB中可在任何窗口控件的CREATEPARAMS成员函数中加入如下语句使之支持OpenGL:
//--以TForm为例
//--记得在unit1.h中class TForm1的priviate部分加入原型:
//--void __fastcall CreateParams(TCreateParams &Params);
//------------------------------------------
TForm1::CreateParams(TCreateParams &Params)
{
// 先调用父类中的成员函数,该函数继承自TWindowControl类
TForm::CreateParams(Params);
Params.Style |= (WS_CLIPCHILDREN | WS_CLIPSIBLINGS);
}
//--------------------------------------
所谓窗口控件是指从TWindowControl派生出来的各类控件,通常可见的控件都是窗口件,前面提到过的TOpenglPanel就是以TCustomPanel为基类派生的,查看其源码就会发现它对窗口属性的修改与上面所述完全相同。
注:这是最简的示例,为使程序在256色等环境中能正常运行,还要在此处理调色板问题。