Files |  Tutorials |  Articles |  Links |  Home |  Team |  Forum |  Wiki |  Impressum

Aktuelle Zeit: Fr Jul 18, 2025 04:32

Foren-Übersicht » Programmierung » Einsteiger-Fragen 		Unbeantwortete Themen | Aktive Themen


Ein neues Thema erstellen Auf das Thema antworten  Seite 1 von 1
  [ 6 Beiträge ] 
  Vorheriges Thema | Nächstes Thema 
Autor Nachricht
sungamer
 Betreff des Beitrags: dglOpenGL richtig einbinden
BeitragVerfasst: Sa Mär 25, 2006 22:31 
Offline
DGL Member

Registriert: Sa Mär 25, 2006 22:26
Beiträge: 3
Hi,
ich bin immoment bei dem sehr gute Einsteiger Tutorial.

Leider findet Delphi, trotz das die OpenGL File bei der Source File ist.

Code:
  1. interface
  2.  
  3. uses
  4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  5. Dialogs, dglOpenGL;
  6.  
  7. type


Es kommt eine meldung das die dglOpenGL.dcu nicht gefunden werden konnte.



Vielleicht kann mir einer helfen!
Danke.



MFG
sungamer
Nach oben
 Profil  
Mit Zitat antworten  
ShadowOfSky
 Betreff des Beitrags:
BeitragVerfasst: Sa Mär 25, 2006 22:37 
Offline
DGL Member
Benutzeravatar

Registriert: Sa Mär 04, 2006 22:54
Beiträge: 32
Hey Sungamer,

du solltest die Datei in das LIB Verzeichnis bei Delphi legen. Oder du legst sie immer in den Ordner wo dein Projekt zu finden ist.
Du kannst aber auch unter Delphi: Projekt - Optionen - Verzeichnisse/Bedingungen - bei Suchpfad den Pfad zu der Unit eintippeln/aussuchen.

Ich hoffe ich konnte dir helfen :-)

_________________
Schönen Gruß, Sky.
Nach oben
 Profil  
Mit Zitat antworten  
Michael
 Betreff des Beitrags:
BeitragVerfasst: Sa Mär 25, 2006 22:44 
Offline
DGL Member
Benutzeravatar

Registriert: Mi Feb 02, 2005 14:22
Beiträge: 81
Wenn du unter Windows programmierst, solltest du vielleicht mal folgendes installieren:

http://www.delphigl.com/do_download.php?f=60000

Da ist dann auch die dglOpenGL.pas dabei...dann sollte alles funktionieren :wink:
Nach oben
 Profil  
Mit Zitat antworten  
sungamer
 Betreff des Beitrags:
BeitragVerfasst: Sa Mär 25, 2006 22:46 
Offline
DGL Member

Registriert: Sa Mär 25, 2006 22:26
Beiträge: 3
Super geht!

Habe aber noch ein anderes kleines Problem:

Code:
  1. unit Unit1;
  2.  
  3. interface
  4.  
  5. uses
  6. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  7. Dialogs, dglOpenGL;
  8.  
  9. type
  10.   TForm1 = class(TForm)
  11.   private
  12.     { Private-Deklarationen }
  13.   public
  14.     { Public-Deklarationen }
  15. end;
  16.  
  17. const
  18.   NearClipping = 1;
  19.   FarClipping  = 1000;
  20.  
  21. var
  22.   Form1: TForm1;
  23.  
  24. implementation
  25.  
  26. {$R *.dfm}
  27.  
  28. end.                                                  <---- Fehler: Text hinter dem abschlißenden END. wird vom Compiler ignoriert
  29.  
  30.  
  31.  
  32.  
  33.  
  34.  
  35. procedure  TForm1.FormCreate(Sender: TObject);
  36. begin
  37. DC:= GetDC(Handle);
  38. if not Initopengl then application.terminate;
  39. RC:= Createrenderingcontext( DC,
  40.                              [opDoubleBuffered],
  41.                              32,
  42.                              24,
  43.                              0,0,0,
  44.                              0);
  45. ActivateRenderingContext( DC, RC);
  46. SetupGL;
  47. Init;
  48. end;
  49.  
  50. procedure TForm1.SetupGL;
  51. begin
  52.   glClearColor(0.3, 0.4, 0.7, 0.0); //Hintergrundfarbe
  53.   glEnable(GL_DEPTH_TEST);          //Tiefentest aktivieren
  54.   glEnable(GL_CULL_FACE);           //Backface Culling aktivieren
  55. end;
  56.  
  57.  
  58. procedure TForm1.FormResize(Sender: TObject);
  59. var tmpBool : Boolean;
  60. begin
  61.   glViewport(0, 0, ClientWidth, ClientHeight);
  62.   glMatrixMode(GL_PROJECTION);
  63.   glLoadIdentity;
  64.   gluPerspective(45.0, ClientWidth/ClientHeight, NearClipping, FarClipping);    
  65.  
  66.   glMatrixMode(GL_MODELVIEW);
  67.   glLoadIdentity;
  68.   IdleHandler(Sender, tmpBool);
  69. end;
  70.  
  71.  
  72. procedure TForm1.FormDestroy(Sender: TObject);
  73. begin
  74.   DeactivateRenderingContext;
  75.   DestroyRenderingContext(RC);
  76.   ReleaseDC(Handle, DC);
  77. end;
  78.  
  79. procedure TForm1.Render;
  80. begin
  81.   glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
  82.  
  83.   glMatrixMode(GL_PROJECTION);
  84.   glLoadIdentity;
  85.   gluPerspective(45.0, ClientWidth/ClientHeight, NearClipping, FarClipping);
  86.  
  87.   glTranslatef(0, 0, -5);
  88.  
  89.   glMatrixMode(GL_MODELVIEW);
  90.   glLoadIdentity;
  91.  
  92.   glBegin(GL_QUADS);
  93.     glColor3f(1, 0, 0); glVertex3f(0, 0, 0);
  94.     glColor3f(0, 1, 0); glVertex3f(1, 0, 0);
  95.     glColor3f(0, 0, 1); glVertex3f(1, 1, 0);
  96.     glColor3f(1, 1, 0); glVertex3f(0, 1, 0);
  97.   glEnd;
  98.  
  99.   SwapBuffers(DC);
  100. end;





Was kann ich gegen den fehler machen?
Nach oben
 Profil  
Mit Zitat antworten  
Michael
 Betreff des Beitrags:
BeitragVerfasst: Sa Mär 25, 2006 22:53 
Offline
DGL Member
Benutzeravatar

Registriert: Mi Feb 02, 2005 14:22
Beiträge: 81
Wo du Ende hinschreibst, ist auch Ende :lol:

Mal im Ernst, End. beendet ein Delphi Programm. Danach geht nix mehr. Deine Prozeduren und Funktionen musst du VOR End. schreiben...

PS: Bevor du OpenGL programmieren möchtest, solltest du dich etwas mit Delphi beschäftigen...
Nach oben
 Profil  
Mit Zitat antworten  
sungamer
 Betreff des Beitrags:
BeitragVerfasst: Sa Mär 25, 2006 22:58 
Offline
DGL Member

Registriert: Sa Mär 25, 2006 22:26
Beiträge: 3
Ich kann nen bisschen Delphi ist mir einfach nicht aufgeffalen!

Alle Probleme haben sich jetzt gelöst.
Vielen Dank für eure Hilfe!
Nach oben
 Profil  
Mit Zitat antworten  
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  Seite 1 von 1
  [ 6 Beiträge ] 
Foren-Übersicht » Programmierung » Einsteiger-Fragen


Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 3 Gäste

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.

Suche nach:
Gehe zu:  
cron
  Powered by phpBB® Forum Software © phpBB Group
Deutsche Übersetzung durch phpBB.de
[ Time : 0.007s | 16 Queries | GZIP : On ]