DGL • Thema anzeigen - Einsteiger Tutorial

Einsteiger Tutorial

Moderator: DGL-Team

Seite 1 von 2

[ 19 Beiträge ]

Gehe zu Seite 1, 2 Nächste

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

gerritlober

Betreff des Beitrags: Einsteiger Tutorial

Verfasst: Fr Feb 03, 2006 18:23

DGL Member

Registriert: Fr Feb 03, 2006 18:20
Beiträge: 5

Hallo,

ich bin eben gerade in eine Tür geplatzt und dann stand ich in der Welt von OpenGL.
Leider funktioniert mein Tutorial nicht wirklich, ich habe das Prog so gemacht, wie es im Text steht,
aber ich seh leider nichts, warum? Muss ich außer der PAS-Datei noch irgendetwas laden?

Hier das Prog:

Code:

unit uMainWindow;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, dglOpenGL;
 
type
  TMainWindow = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
    procedure FormShow(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;
 
var
  MainWindow: TMainWindow;
  DC, RC: HDC;
 
implementation
 
{$R *.dfm}
 
procedure TMainWindow.FormCreate(Sender: TObject);
begin
  InitOpenGL;
  DC := GetDC(Handle);
  RC := CreateRenderingContext(DC, [opDoubleBuffered], 32, 24, 0, 0, 0, 0);
  ActivateRenderingContext(DC, RC);
  glViewport(0, 0, ClientWidth, ClientHeight);
  glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
end;
 
procedure TMainWindow.FormDestroy(Sender: TObject);
begin
  DestroyRenderingContext(RC);
  ReleaseDC(Handle, DC);
end;
 
procedure TMainWindow.FormShow(Sender: TObject);
begin
  glLoadIdentity;
  glBegin(GL_TRIANGLES);
  glColor3f(1, 0, 0); glVertex3f(-1,-1, 0);  
  glColor3f(0, 0, 1); glVertex3f( 1,-1, 0);
  glColor3f(0, 1, 0); glVertex3f( 0, 1, 0);
glEnd;
end;
 
end.

_________________
Grüße
Gerrit

Nach oben

Phobeus

Betreff des Beitrags:

Verfasst: Fr Feb 03, 2006 18:25

Fels i.d. Brandung

Registriert: Sa Mai 04, 2002 19:48
Beiträge: 3830
Wohnort: Tespe (nahe Hamburg)

Bevor ich detailliert darauf eingehe, schnappe Dir lieber parallel dazu eines unserer Templates (z.B. das VCL http://www.delphigl.com/do_download.php?f=8) und gehe das einmal durch. Hat sich dein Problem erledigt oder gibt es noch Fragen?

_________________
"Light travels faster than sound. This is why some people appear bright, before you can hear them speak..."

Nach oben

Frase

Betreff des Beitrags:

Verfasst: Fr Feb 03, 2006 18:26

Forenkatze

Registriert: Mi Okt 22, 2003 18:30
Beiträge: 1945
Wohnort: Närnberch
Programmiersprache: Scala, Java, C*

Hi Gerrit,

benutz doch die pascal-Tags. Die sind extra für sowas da

Dann kann man das besser lesen.

Du rufst deine Zeichen-Prozedur nur einmal auf, wenn dein Form aufgerufen wird. Setze es in eine Idle-Schleife ein, dann ist das Problem gelöst. Wie man das macht, kann jemand anderes erklären ^^ Bin grad zu faul

Gruß,
Frase

_________________
"Für kein Tier wird so viel gearbeitet wie für die Katz'."

Nach oben

gerritlober

Betreff des Beitrags:

Verfasst: Fr Feb 03, 2006 18:36

DGL Member

Registriert: Fr Feb 03, 2006 18:20
Beiträge: 5

Es würde ja reichen, wenn es einmal gezeichnet würde, aber es passiert gar nichts, muss man erst ein SDK installieren oder so? :?:

_________________
Grüße
Gerrit

Nach oben

i0n0s

Betreff des Beitrags:

Verfasst: Fr Feb 03, 2006 18:39

Ernährungsberater

Registriert: Sa Jan 01, 2005 17:11
Beiträge: 2068
Programmiersprache: C++

Der Fehler in dem Code ist einfach

Du renderst es zwar, gibst es aber nicht aus...

Code:

SwapBuffers(DC);

fehlt.

Nach oben

gerritlober

Betreff des Beitrags:

Verfasst: Fr Feb 03, 2006 18:43

DGL Member

Registriert: Fr Feb 03, 2006 18:20
Beiträge: 5

Ich seh leider noch immer nichts?!

_________________
Grüße
Gerrit

Nach oben

Phobeus

Betreff des Beitrags:

Verfasst: Fr Feb 03, 2006 18:44

Fels i.d. Brandung

Registriert: Sa Mai 04, 2002 19:48
Beiträge: 3830
Wohnort: Tespe (nahe Hamburg)

Wie gesagt, lade Dir das Template runter und schaue es Dir an. Z.B. ist "onshow" in dem meisten Fällen der denkbar schlechteste Zeitpunkt um etwas zu zeichnen. Das OnIdyle oder ein Timer bietet sich hier meist eher an. Grob überflogen fehlt bei Dir die Übergabe des Ganzen an die Ausgabe:

Code:

SwapBuffers(DC); 

Aber wie gesagt, bei obigen Link findest Du eine fertige Vorlage bei der man sieht, wie man OpenGL auf Basis der VCL verwenden kann. Da Du scheinbar ja bereits die Header von uns hast, sollte das Template lauffähig sein. Die SDK ist hierfür nicht von Nöten. Es handelt sich dabei um einen Installer der gängige Header und Beispiele installiert. Diese sollen Einsteigern jedoch nur dabei helfen einen Einstieg in die Materie zu finden und zu verhindern, dass diese sich alles einzelnd zusammensuchen müssen. Es ist keine SDK im Sinne jener die Du bei DirectX von MS beziehst.
//edit: Ich brauche scheinbar zu lange zum tippen *sg

_________________
"Light travels faster than sound. This is why some people appear bright, before you can hear them speak..."

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Sa Feb 04, 2006 16:23

Guitar Hero

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7810
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)

Ein Blick in das Quickstart-Tutorial sollte dir vielleicht auch weiterhelfen.

_________________
Blog: kevin-fleischer.de und fbaingermany.com

Nach oben

Frase

Betreff des Beitrags:

Verfasst: Sa Feb 04, 2006 22:22

Forenkatze

Registriert: Mi Okt 22, 2003 18:30
Beiträge: 1945
Wohnort: Närnberch
Programmiersprache: Scala, Java, C*

tstststs... Phobeus... Flash... tststs... Hätte nie gedacht, dass ich das noch mal erlebe, dass hier jemand das rtfm!-Schild hochhält...

_________________
"Für kein Tier wird so viel gearbeitet wie für die Katz'."

Nach oben

Betreff des Beitrags:

Verfasst: Sa Feb 04, 2006 23:48

DGL Member

Registriert: Sa Jan 22, 2005 21:10
Beiträge: 225

Ja aber sie haben doch recht. Sollen wir jedem einzeln erklähren, dass sie die Buffer swappen müssen, das sie nicht in OnShow zeichnen sollen, und dass man auf das Einstellen der Betrachtungs und Projektionsmatrizen nicht verzichten sollte?

Dafür sind doch die Tuts da, damit dass nicht für jeden erklährt werden muss...

_________________
[18:30] tomok: so wie ich das sehe : alles. was nich was anderes ist als nen Essay ist nen Essay

hi, i'm a signature viruz, plz set me as your signature and help me spread

Nach oben

Frase

Betreff des Beitrags:

Verfasst: So Feb 05, 2006 00:33

Forenkatze

Registriert: Mi Okt 22, 2003 18:30
Beiträge: 1945
Wohnort: Närnberch
Programmiersprache: Scala, Java, C*

ja schon

Ist klar.

Hier wurde nur mal kürzlich geschrieben, dass auch dem dümmsten n00b alles erklärt wird, selbst wenn die Frage vorher schon tausendmal gestellt wurde... Ohne rtfm!

Die Zeiten ändern sich eben...
Aber es geschieht ja zu einem guten Zweck. Und sollte es auch nur der sein, dass Phobeus wieder ein kleines bisschen mehr Zeit hat, so ist es das wert

_________________
"Für kein Tier wird so viel gearbeitet wie für die Katz'."

Nach oben

gerritlober

Betreff des Beitrags:

Verfasst: So Feb 05, 2006 16:14

DGL Member

Registriert: Fr Feb 03, 2006 18:20
Beiträge: 5

Man sollte doch aber, wenn dies Problem oder diese Frage öfters auftritt, vielleicht dieses AUCH im Tutorial selbst vermerken oder? :?:

_________________
Grüße
Gerrit

Nach oben

Deathball

Betreff des Beitrags:

Verfasst: So Feb 05, 2006 18:13

DGL Member

Registriert: Do Aug 25, 2005 16:00
Beiträge: 189
Programmiersprache: Java, C#

Das mit den Swap Buffers ist auf alle Fälle vermerkt:

Quickstart hat geschrieben:

Zeile 21: SwapBuffers sorgt Ihr dafür, dass der Inhalt des Framebuffers auf dem Bildschirm erscheint. Ohne diesen Befehl seht Ihr gar nichts von OpenGL. (Interessanter Artikel dazu: Doppelpufferung)

Zu den Matrizen steht es zwar drin, ist aber nicht so wirklich deutlich das man sie unbedingt braucht:

Quickstart hat geschrieben:

Zeile 5/9: Hier seht Ihr 2 der 3 möglichen Matrixmodi. GL_PROJECTION wird benutzt um nachfolgend die OpenGL-Ausgabe zu manipulieren, GL_MODELVIEW benutzt man um OpenGL mit Daten zu füttern.

cya
Deathball

Nach oben

Mishra

Betreff des Beitrags:

Verfasst: Di Feb 07, 2006 20:27

DGL Member

Registriert: Di Feb 07, 2006 20:22
Beiträge: 27

Genau das Problem habe ich auch. Leider hat bisher nichts zur Lösung beigetragen, auch das Template konnte mir nicht helfen. Das Programm lässt sich fehlerfrei kompilieren, allerdings bliebt der Bildrschirm grau und kein fesches Dreickeck erscheint. Bitte schaut es euch mal an:

Code:

 
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, dglOpenGL;
 
type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
    procedure Render;
    procedure OnIdle;
  private
    { Private declarations }
 
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
  DC, RC :HDC;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.FormCreate(Sender: TObject);
begin
InitOpenGL;//OpenGl wird Initialisiert, folgenden 2 Zeilen werde immer grbraucht
DC:=GetDC(Handle);
RC:=CreateRenderingContext(DC, [opDoubleBuffered], 32, 24, 0, 0, 0, 0);
ActivateRenderingContext(DC, RC);
glClearColor(0.3, 0.4, 0.7, 0.0);
end;
 
procedure TForm1.FormDestroy(Sender: TObject);
begin
DeactivateRenderingContext;
DestroyRenderingContext(RC);
ReleaseDC(Handle,DC);
end;
 
procedure TForm1.Render;
begin
  glMatrixMode(GL_PROJECTION);
  glLoadIdentity;
  glViewport(0, 0, ClientWidth, ClientHeight);
  gluPerspective(60, ClientWidth/ClientHeight,1, 128);
  glMatrixMode(GL_Modelview);
  glLoadIdentity;
  glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
  glTranslatef(-1.5, 0,-6);
  glBegin(GL_TRIANGLES);
  glColor3f(1, 0, 0); glVertex3f(-1,-1, 0);  
  glColor3f(0, 0, 1); glVertex3f( 1,-1, 0);
  glColor3f(0, 1, 0); glVertex3f( 0, 1, 0);
glEnd;
SwapBuffers(DC);
end;
 
procedure TForm1.Onidle;
begin
Render;
end;
end.
 

Bitte helft mir!

Nach oben

i0n0s

Betreff des Beitrags:

Verfasst: Di Feb 07, 2006 20:35

Ernährungsberater

Registriert: Sa Jan 01, 2005 17:11
Beiträge: 2068
Programmiersprache: C++

Wann soll den TForm1.onIdle aufgerufen werden?
Bzw. wann sagst du VCL, dass es die Procedure dafür benutzen soll?

Nach oben

Seite 1 von 2

[ 19 Beiträge ]

Gehe zu Seite 1, 2 Nächste

Foren-Übersicht » Programmierung » Einsteiger-Fragen

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 7 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.