Discussion :

[stick059]

Bonjour tout le monde !

Voila, j'ai un petit problème avec le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
 
program Template;
 
uses
  Windows,
  Messages,
  glut,
  OpenGL;
 
const
  WND_TITLE = 'Mes premiers en pas OpenGL';
 
var
  spin : integer;
 
{$R *.RES}
 
procedure init();
begin
  glclearcolor(0,0,0,0);
  glshademodel(gl_flat);
end;
 
procedure display ;cdecl;
begin
  glclear(GL_color_buffer_bit);
  glpushmatrix();
  glrotate(45,0,0,1);
  glcolor3f(1,1,1);
  glrectf(-25,-25,25,25);
  glpopmatrix();
  glutswapbuffers();
end;
 
procedure reshape(Width, Height : Integer);cdecl;
begin
  glViewport(0, 0, Width, Height);
  glmatrixmode(gl_projection);
  glloadidentity();
  glortho(-50,50,-50,50,-1,1);
  glmatrixmode(gl_modelview);
  glloadidentity();
end;
 
begin
  glutinit(MS_LIB);
  glutinitdisplaymode(GLUT_DOUBLE or GLUT_RGB);
  glutinitwindowsize(250,250);
  glutinitwindowposition(100,100);
  glutcreatewindow(WND_TITLE);
  init();
  glutdisplayfunc(display);
  glutreshapefunc(reshape);
  glutmainloop();
end.

Je m'explique :
Une fois le code compilé et éxécuté, la fenetre openGL s'ouvre bien, avec un joli petit

carré en son centre, pivoté de 45 degré selon l'axe z, jusque là, pas de problème.
Par contre, dés que je veux redimensionner la fenetre, au lieu de me recalculer la

scène pour un affichage correct, il me déforme mon jolie petit carré, j'arrive pas à

trouver de solution, au secours !

[olivic]

Cela vient de glOrtho, il doit être fonction de la résolution.

Par exemple : glOrtho(0, 0, width, height)

[stick059]

Oui, je me doutais que ça venais de là, mais à ce moment là, comment récupérer les dimensions de la fenetre pour actualiser "glOrtho(0, 0, width, height)" en fonciton des dimensions pour ne pas avoir de pertubation ?

[olivic]

Dans ton cas, il faut faire appel à glOrtho que lorsque l'on redimmensionne la fenêtre. Lorsque celle-ci est redimensionnée, glut appel la fonction reshape en te passant la largeur et la hauteur de la fenêtre. En définitive, ta fonction reshape devient :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
procedure reshape(Width, Height : Integer);cdecl; 
begin 
  glViewport(0, 0, Width, Height); 
  glmatrixmode(gl_projection); 
  glloadidentity(); 
  glortho(0, 0, Width, Height, 0, 1000);
  glmatrixmode(gl_modelview); 
  glloadidentity(); 
end;

Normalement, tu devrais voir un quart de ton rectangle.

Les push et pop matrice sont inutiles dans ton cas. Faudrait-il pas plutôt écrire glrotate4f à la place de glrotate ?

[stick059]

J'ai cherché un peu, et j'ai trouvé !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
procedure reshape(W,H: Integer);cdecl;
begin
  glViewport(0, 0, w, h);
  glmatrixmode(gl_projection);
  glloadidentity();
  if w <= h
  then glOrtho (-50, 50, -50*h/w, 50*h/w, -1, 1)
  else glOrtho (-50*w/h, 50*w/h, -50, 50, -1, 1);
  glmatrixmode(gl_modelview);
  glloadidentity();
end;

J'avais essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
procedure reshape(Width, Height : Integer);cdecl; 
begin 
  glViewport(0, 0, Width, Height); 
  glmatrixmode(gl_projection); 
  glloadidentity(); 
  glortho(0, 0, Width, Height, 0, 1000); 
  glmatrixmode(gl_modelview); 
  glloadidentity(); 
end;

Mais le résultat n'étais pas satisfaisant.

Effectivement, la logique voudrais que j'écrive :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
glrotate4f(spin,0,0,1);

Au lieu de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
glrotate(spin,0,0,1);

J'avais pas fait gaffe, mais ce qui est étrange, c'est que cela fonction avec juste glrotate !

Pour ce qui est des push pop, je me suis pas penché sur la question.
En fait, ce code est tiré du livre "OpenGL 1.4" de chez Campus press, le problème est que les exemples du livre sont donné en C, j'essaie de les transcrire en pascal, et le probleme est que je cherche midi à 14 h, en fait, en cherchant un peu dans le livre, la réponse est doinné.

En passant, je conseil à tous ce bouquin, vraiment interressant et complet (traduction du redbook donc forcement !)

En tout cas, merci pour ces réponse qui m'ont bien mis sur la bonne voie.

Laurent...