Servus,

nachdem ich vor kurzem ein OpenGL-Widget vorgestellt habe, das mit der von Borland gelieferten (leider veralteten) OpenGL.pas funktioniert, gibt es jetzt eine neue Variante.

I proudly present: OpenGLPanel.

Diesmal basiert es auf einem TPanelund nutzt als OpenGL Hintergrund die dglOpenGL.pas von DelphiGL.com. Diese Unit ist NICHT im Package enthalten und muß von o.g. Seite erst noch herunter geladen werden.
Damit hat sich die Initialisierung leider etwas verkompliziert, es werden aber alle aktuelle Erweiterungen sowie 3D Texturen etc. unterstützt.
Ein einfaches Beispiel ist mit dabei.

Info:
Diese Komponente initialisiert lediglich einen OpenGL-Kontext. Der OpenGL-Code zum zeichnen wird wieder im OnRender-Ereignis verpackt.

Grüße

Wolf

In deinem Code Steht so was :

markieren

Delphi-Quellcode:

procedure TOGLPanel.setFovy(value : Single);
begin
  if (value > 0) and (value < 90) then
    FFovy := value;
end;

Fov -> Field of View (angle)
Diese variable kann eigentlich Werte von 1(Inklusiv) bis 189(Inklusiv) annehmen.

Stimmt wohl. Da für meine Anwendung allerdings max. 90° ausreichen, ist das wohl noch ein Überbleibsel und wird irgendwann geändert.
Desweiteren sind laut Redbook (OpenGL Programming Guide third Edition) Werte im Bereich
[0.0, 180.0] erlaubt.
[Zitat S.126]
its value must be in the range [0.0, 180.0]
[/Zitat]

Gruß

Wolf