(*
Zeichnet den Hintergrund und stellt Punkteanzahl und Frames pro Sekunde dar
*)
procedure DrawBackground;
begin
  TexAnim := TexAnim + LastFrameTime * BackGroundSpeed;
  TexAnim := TexAnim - Trunc(TexAnim);
  glClear(GL_DEPTH_BUFFER_BIT);
  glDisable(GL_LIGHTING);
  glLoadIdentity;
  Background.Display;
  glDisable(GL_LIGHTING);
  glColor3f(0.0,0.0,0.3);
  glDepthMask(false);
  glBegin(GL_QUADS);
    glTexCoord2f(0, TexAnim);
    glVertex3f(-4, -4, -2);
    glTexCoord2f(4, TexAnim);
    glVertex3f( 4, -4, -2);
    glTexCoord2f(4, 2 + TexAnim);
    glVertex3f( 4,  4, -2);
    glTexCoord2f(0, 2 + TexAnim);
    glVertex3f(-4,  4, -2);
  glEnd;
  ShowMessage(-0.5, 0.25, 'Punkte: ' + IntToStr(Points));
  ShowMessage(0.3, 0.25, 'FpS: ' + IntToStr(Round(1/LastFrameTime)));
  glDepthMask(true);
  glEnable(GL_LIGHTING);
  glBindTexture(GL_TEXTURE_2D, 0);
end;