Windows平台下OpenGL汉字处理方法.zip_OpenGL Chinese Text_OpenGL 汉字_OpenGL显

//--------------------------------------------------------------------------- #include <vcl.h> #include <gl/gl.h> #pragma hdrstop #include "stdlib.h" #include "main.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; void CreateFont(void); GLYPHMETRICSFLOAT pgmf[1]; int x,y,z; void glDrawString(unsigned char *str) { HDC hDC=wglGetCurrentDC(); DWORD dwChar; int ListNum; for(size_t i=0;i<strlen((char *)str);i++) { if(IsDBCSLeadByte(str[i])) {dwChar=(DWORD)((str[i]<<8)|str[i+1]);i++;} else dwChar=str[i]; ListNum=glGenLists(1); wglUseFontOutlines(hDC,dwChar,1,ListNum,0.0,0.1,WGL_FONT_POLYGONS,pgmf); glCallList(ListNum); glDeleteLists(ListNum,1); } } void CreateFont(void) { HFONT HFont,HOldFont=0; LOGFONT LogFont; GetObject(Form1->Font->Handle,sizeof(LOGFONT),&LogFont); HFont = CreateFontIndirect(&LogFont); HOldFont=SelectObject (Form1->hDC, HFont); DeleteObject(HOldFont); } //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { hDC=GetDC(Handle); //茆取一个DC，TForm1.Handle中保存有Form的窗口句柄 SetDCPixelFormat(hDC); //调整该DC的象素格式 hRC=wglCreateContext(hDC); //用这种DC去创建一个RC wglMakeCurrent(hDC,hRC); //指定当前DC、当前RC为hDC、hRC glEnable(GL_COLOR_MATERIAL); randomize(); glColor3f(random(255)/255.0,random(255)/255.0,random(255)/255.0); CreateFont(); } //--------------------------------------------------------------------------- void __fastcall TForm1::CreateParams(TCreateParams& Params) { TForm::CreateParams(Params); //调用原有函数预处理 Params.Style|=WS_CLIPCHILDREN|WS_CLIPSIBLINGS;//加上必要的属性 } //--------------------------------------------------------------------------- void __fastcall TForm1::SetDCPixelFormat(HDC hDC) { //本函数用于调整DC的象素格式，如缓冲区、颜色数等 //先不深究，只要知道它的作用就行 int nPixelFormat; static PIXELFORMATDESCRIPTOR pfd = { sizeof(PIXELFORMATDESCRIPTOR), // Size of this structure 1, // Version of this structure PFD_DRAW_TO_WINDOW | // Draw to Window (not to bitmap) PFD_SUPPORT_OPENGL | // Support OpenGL calls in window PFD_DOUBLEBUFFER, // Double buffered mode PFD_TYPE_RGBA, // RGBA Color mode 24, // Want 24bit color 0,0,0,0,0,0, // Not used to select mode 0,0, // Not used to select mode 0,0,0,0,0, // Not used to select mode 32, // Size of depth buffer 0, // Not used to select mode 0, // Not used to select mode PFD_MAIN_PLANE, // Draw in main plane 0, // Not used to select mode 0,0,0 }; // Not used to select mode // Choose a pixel format that best matches that described in pfd nPixelFormat = ChoosePixelFormat(hDC, &pfd); // Set the pixel format for the device context SetPixelFormat(hDC, nPixelFormat, &pfd); } //--------------------------------------------------------------------------- void RenderScence(void) { //try to draw fonts. byte cstr[]={"OpenGL测试"}; //glTranslatef(-1,-1,0); glScalef(0.2,0.2,1); glDrawString(cstr); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormPaint(TObject *Sender) { //该Form的绘制响应函数 glClearColor(0.5,0.7,0.9,1.0); //指定背景颜色（依次为RGBA） glClear(GL_COLOR_BUFFER_BIT); //用背景色清窗口 glPushMatrix(); glRotatef(x,1.0,0.0,0.0); glRotatef(y,0.0,1.0,0.0); glRotatef(z,0.0,0.0,1.0); RenderScence(); glPopMatrix(); SwapBuffers(hDC); //切交缓冲区，这就是可以启动图形库处理流程并得相应结果的两条命令之一 //如果当前RC相联DC具有DoubleBuffer的PixelFormat则用本命令 //否则就是单缓冲DC，用glFlush(void)进行更新。 } //--------------------------------------------------------------------------- void __fastcall TForm1::FormDestroy(TObject *Sender) { wglMakeCurrent(NULL,NULL); //取消当前RC和当前DC wglDeleteContext(hRC); //删除该RC // DeleteObject(hDC); //删除Windows DC。!!交给VCL系统自动完成。 } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { Timer1->Enabled=false; x=y=z=0; FormPaint(Sender); fd->Execute(); Form1->Font=fd->Font; CreateFont(); Timer1->Enabled=true; } //--------------------------------------------------------------------------- void __fastcall TForm1::Timer1Timer(TObject *Sender) { x=(x+random(10))%360; y=(y+random(10))%360; z=(z+random(5))%360; FormPaint(Sender); } //---------------------------------------------------------------------------