procedure TForm1.NastaveniProstoru;
begin
  glMatrixMode(GL_PROJECTION);
  glLoadIdentity;
  gluPerspective(30.0,ClientWidth / ClientHeight,1.0,10.0);
  glViewport(0,0,ClientWidth,ClientHeight);
end;