- glMatrixMode(GL_PROJECTION);
- glLoadIdentity;
- glOrtho(0,640,480,0,-2,2);
- glMatrixMode(GL_MODELVIEW);
- glLoadIdentity;
- glEnable(GL_Texture_2d);
- TextureManager.BindTexture('inevitable_1024.jpg');
- glDisable(gl_Depth_test);
- glClear(GL_DEPTH_BUFFER_BIT or GL_COLOR_BUFFER_BIT);
- glColor3f(1,1,1);
- glBegin(GL_QUADS);
- glTexCoord2f(0,1); glVertex3f(0, 0, 0);
- glTexCoord2f(0,0); glVertex3f(0, 480, 0);
- glTexCoord2f(1,0); glVertex3f(640, 480, 0);
- glTexCoord2f(1,1); glVertex3f(640, 0, 0);
- glEnd;
- for i := Low(EntryName) to High(EntryName) do
- if i = Game.MenueSelected then
- TextureFont.Print2D(EntryName[i], [230,EntryPos[i],0],[1,0.3,0.3],1,1)
- else
- TextureFont.Print2D(EntryName[i], [230,EntryPos[i],0],[1,1,1],1,1);
- swapBuffers(DC);