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

Aktuelle Zeit: Mi Mai 29, 2024 02:19

Foren-Übersicht » Programmierung » Shader 		Unbeantwortete Themen | Aktive Themen


Ein neues Thema erstellen Auf das Thema antworten  Seite 1 von 2
  [ 19 Beiträge ]  Gehe zu Seite 1, 2  Nächste
  Druckansicht Vorheriges Thema | Nächstes Thema 
Autor Nachricht
KSM
 Betreff des Beitrags: Shader-Probleme unter Delphi 2009
BeitragVerfasst: Fr Aug 07, 2009 12:11 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Hi :)!

Ich würde sehr gerne anfangen, mit glSlang zu arbeiten.

Doch ich habe noch nicht so richtig verstanden, wie ich die Shader in meinem Programm anwende. Das Laden der Shader funktioniert, nur ich würde gerne einmal den Beispielshader aus dem glSlang-Tutorial 1 nachbauen. Wie mache ich das beim Rendern?

Bisher mache ich das so:

Beim Rendern:

Code:
  1.  
  2.  
  3. glEnable(GL_TEXTURE_2D);
  4.  
  5.   glUseProgramObjectARB( ProgramObject );
  6.  
  7.   glUniform1iARB( GetUniLoc( ProgramObject, 'Texture0' ), TextureID[ 0 ] );
  8.   glUniform1iARB( GetUniLoc( ProgramObject, 'Texture1' ), TextureID[ 1 ] );
  9.   glUniform1iARB( GetUniLoc( ProgramObject, 'Texture2' ), TextureID[ 2 ] );
  10.   glUniform1iARB( GetUniLoc( ProgramObject, 'Texture3' ), TextureID[ 3 ] );
  11.   glUniform4fARB( GetUniLoc( ProgramObject, 'GlobalColor' , 1.0, 1.0, 1.0, 1.0 );
  12.  
  13.   glBegin(GL_QUADS);
  14.     glTexCoord2f( 0,0 );
  15.     glVertex3f(-0.5,-0.5, -1);
  16.  
  17.     glTexCoord2f( 0,1 );
  18.     glVertex3f( 0.5, -0.5, -1);
  19.  
  20.  
  21.     glTexCoord2f( 1,1 );
  22.     glVertex3f( 0.5, 0.5, -1);
  23.  
  24.  
  25.     glTexCoord2f( 1,0 );
  26.     glVertex3f( -0.5, 0.5, -1);
  27.   glEnd();
  28.  
  29.   glUseProgramObjectARB( 0 );
  30.  
  31.  


Funktion GetUniLoc:

Code:
  1.  
  2.  
  3. function GetUniLoc( ProgrammObjekt: Integer; VarName: String ): Integer;
  4. begin
  5.   Result := glGetUniformLocationARB( ProgrammObjekt, PGLCharARB( VarName ) );
  6. end;
  7.  
  8.  


Könnt ihr mir sagen, was ich falsch mache?
Schöne Grüße, KSM

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!


Zuletzt geändert von KSM am Sa Aug 08, 2009 21:16, insgesamt 1-mal geändert.

Nach oben
 Profil  
Mit Zitat antworten  
Flash
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 12:43 
Offline
Guitar Hero
Benutzeravatar

Registriert: Do Sep 25, 2003 15:56
Beiträge: 7804
Wohnort: Sachsen - ERZ / C
Programmiersprache: Java (, Pascal)
Konnte im Wiki ebenfalls kein Code-Archiv zum Tutorial finden. (Nur für GLSL2)

Falls jemand ein passendes Stück Code hat, bitte posten, damit das ins Wiki kann.

_________________
Blog: kevin-fleischer.de und fbaingermany.com
Nach oben
 Profil  
Mit Zitat antworten  
Coolcat
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 13:14 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 29, 2005 12:28
Beiträge: 2249
Wohnort: Düsseldorf
Programmiersprache: C++, C#, Java
Ich denke mal es wird daran liegen das du die Texturen nicht richtig setzt...so müsste es gehen, habe aber nicht probiert:

Code:
  1. glEnable(GL_TEXTURE_2D);
  2. glActiveTexture(GL_TEXTURE0);
  3. glBindTexture(GL_TEXTURE_2D, TextureID[0]);
  4. glActiveTexture(GL_TEXTURE1);
  5. glBindTexture(GL_TEXTURE_2D, TextureID[1]);
  6. glActiveTexture(GL_TEXTURE2);
  7. glBindTexture(GL_TEXTURE_2D, TextureID[2]);
  8. glActiveTexture(GL_TEXTURE3);
  9. glBindTexture(GL_TEXTURE_2D, TextureID[3]);
  10.  
  11. glUseProgramObjectARB( ProgramObject );
  12. glUniform1iARB( GetUniLoc( ProgramObject, 'Texture0' ), 0);
  13. glUniform1iARB( GetUniLoc( ProgramObject, 'Texture1' ), 1);
  14. glUniform1iARB( GetUniLoc( ProgramObject, 'Texture2' ), 2);
  15. glUniform1iARB( GetUniLoc( ProgramObject, 'Texture3' ), 3);
  16. glUniform4fARB( GetUniLoc( ProgramObject, 'GlobalColor' , 1.0, 1.0, 1.0, 1.0 );
  17.  
  18. glBegin(GL_QUADS);
  19. glTexCoord2f( 0,0 );
  20. glVertex3f(-0.5,-0.5, -1);
  21. glTexCoord2f( 0,1 );
  22. glVertex3f( 0.5, -0.5, -1);
  23. glTexCoord2f( 1,1 );
  24. glVertex3f( 0.5, 0.5, -1);
  25. glTexCoord2f( 1,0 );
  26. glVertex3f( -0.5, 0.5, -1);
  27. glEnd();
  28.  
  29. glUseProgramObjectARB( 0 );


Nachtrag:
Sofern die Uniforms (auch nur einzelne) wie in diesem Fall konstant sind, braucht man die nur ein einziges mal setzen. Das geht auch wenn man zwischen durch andere Shader verwendet.

_________________
Yeah! :mrgreen:
Nach oben
 Profil  
Mit Zitat antworten  
KSM
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 13:23 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Hmm, ich habe den Quelltext geändert, er zeigt allerdings nur die Hintergrund-Textur an (TextureID[0]), also die, die nur rot, grün und blau ist.

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!
Nach oben
 Profil  
Mit Zitat antworten  
Coolcat
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 14:17 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 29, 2005 12:28
Beiträge: 2249
Wohnort: Düsseldorf
Programmiersprache: C++, C#, Java
Sind den die Texturen korrekt geladen, also stimmen die Werte in TextureID[1] bis TextureID[3] ?

_________________
Yeah! :mrgreen:
Nach oben
 Profil  
Mit Zitat antworten  
KSM
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 17:07 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Ja, ohne Shader hat es ja damit immer funktioniert...

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!
Nach oben
 Profil  
Mit Zitat antworten  
Coolcat
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 17:35 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 29, 2005 12:28
Beiträge: 2249
Wohnort: Düsseldorf
Programmiersprache: C++, C#, Java
Zitat:
Das Laden der Shader funktioniert

Bist du dir da sicher? Hast du auf Compiler- und Link-Fehler geprüft? Für mich sieht das so aus, als ob du ganz normal mit der FFP arbeitest...

_________________
Yeah! :mrgreen:
Nach oben
 Profil  
Mit Zitat antworten  
KSM
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 17:42 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Das Laden funktiiniert auf jeden Fall. ShowMessage liefert leere Dialoge. Hier nochmal der Quelltext:

Code:
  1.  
  2.  
  3. // =============================================================================
  4. //  TfrmMain.SetupShaders
  5. // =============================================================================
  6. //  Hier werden die Shader initialisert.
  7. // =============================================================================
  8. procedure TfrmMain.SetupShaders;
  9. var
  10.   VShader, FShader: AnsiString;
  11.   VShaderl, FShaderl: Integer;
  12.  
  13.   procedure LoadShaderS( Shader: String; var ShaderText: AnsiString; var ShaderLength: Integer );
  14.   var
  15.     Str: TStringList;
  16.     Rc: TResourceStream;
  17.   begin
  18.     Rc := TResourceStream.Create( HInstance, Shader, PChar( Copy( Shader, 1, 2 ) ) );
  19.     try
  20.       Str := TStringList.Create;
  21.       try
  22.         Str.LoadFromStream( Rc );
  23.         ShaderText := AnsiString( Str.Text );
  24.         ShaderLength := Length( Str.Text );
  25.       finally
  26.         Str.Free;
  27.       end;
  28.     finally
  29.       Rc.Free;
  30.     end;
  31.   end;
  32. begin
  33.  
  34.   // Shader erstellen
  35.   ProgramObject := glCreateProgramObjectARB;
  36.   VertexShaderObject := glCreateShaderObjectARB(GL_VERTEX_SHADER_ARB);
  37.   FragmentShaderObject := glCreateShaderObjectARB(GL_FRAGMENT_SHADER_ARB);
  38.  
  39.   // Shadertext laden
  40.   LoadShaderS( 'VSHADER', VShader, VShaderL );
  41.   LoadShaderS( 'FSHADER', FShader, FShaderL );
  42.  
  43.   glShaderSourceARB(VertexShaderObject, 1, @VShader, @VShaderL);
  44.   glShaderSourceARB(FragmentShaderObject, 1, @FShader, @FShaderL);
  45.   // Shadertext kompilieren
  46.   glCompileShaderARB(VertexShaderObject);
  47.   ShowMessage(glSlang_GetInfoLog(VertexShaderObject));
  48.  
  49.   glCompileShaderARB(FragmentShaderObject);
  50.   ShowMessage(glSlang_GetInfoLog(FragmentShaderObject));
  51.  
  52.   // Fehler abrufen
  53.   glAttachObjectARB(ProgramObject, VertexShaderObject);
  54.   glAttachObjectARB(ProgramObject, FragmentShaderObject);
  55.   // Shaderobjekte wieder frei geben
  56.   glDeleteObjectARB(VertexShaderObject);
  57.   glDeleteObjectARB(FragmentShaderObject);
  58.   // Shader linken
  59.   glLinkProgramARB(ProgramObject);
  60.  
  61. end;
  62.  
  63.  


Und die Shader:

Vertexs.:
Code:
  1.  
  2.  
  3. uniform vec4 GlobalColor;
  4.  
  5. void main(void)
  6. {
  7.  gl_Position     = gl_ModelViewProjectionMatrix * gl_Vertex;
  8.  gl_FrontColor   = gl_Color * GlobalColor;
  9.  gl_TexCoord[0]  = gl_MultiTexCoord0;
  10. }
  11.  
  12.  


Fragments.:

Code:
  1.  
  2.  
  3. uniform sampler2D Texture0;
  4. uniform sampler2D Texture1;
  5. uniform sampler2D Texture2;
  6. uniform sampler2D Texture3;
  7.  
  8. void main(void)
  9. {
  10.  vec2 TexCoord = vec2( gl_TexCoord[0] );
  11.  vec4 RGB      = texture2D( Texture0, TexCoord );
  12.  
  13.  gl_FragColor  = texture2D(Texture1, TexCoord) * RGB.r +
  14.                  texture2D(Texture2, TexCoord) * RGB.g +
  15.                  texture2D(Texture3, TexCoord) * RGB.b;
  16. }
  17.  
  18.  

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!
Nach oben
 Profil  
Mit Zitat antworten  
Coolcat
 Betreff des Beitrags:
BeitragVerfasst: Fr Aug 07, 2009 18:01 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 29, 2005 12:28
Beiträge: 2249
Wohnort: Düsseldorf
Programmiersprache: C++, C#, Java
Code:
  1. // Shaderobjekte wieder frei geben
  2. glDeleteObjectARB(VertexShaderObject);
  3. glDeleteObjectARB(FragmentShaderObject);
  4. // Shader linken
  5. glLinkProgramARB(ProgramObject);

Hm, ich weiß nicht ob es eine gute Idee ist die Shader-Objekte freizugeben bevor du das Programm linkst. Allerdings würde ich mal annehmen das dann da eine Fehlermeldung beim Linken kommen würde (und es steht auch so im Tutorial). Ansonsten sieht das eigentlich gut aus.

_________________
Yeah! :mrgreen:
Nach oben
 Profil  
Mit Zitat antworten  
KSM
 Betreff des Beitrags:
BeitragVerfasst: Sa Aug 08, 2009 00:18 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Was mich ja so wundert ist, dass er die Haupttextur anzeigt ... :?:

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!
Nach oben
 Profil  
Mit Zitat antworten  
humflo
 Betreff des Beitrags:
BeitragVerfasst: Sa Aug 08, 2009 02:35 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 04, 2008 23:15
Beiträge: 39
Wohnort: Oberösterreich
Programmiersprache: ObjPas, C, DivASM
Muss man nicht für jede Textureinheit das Target aktivieren? Textureinheit haben ja alle ihren eigenen State.
Code:
  1.  
  2. glActiveTexture(GL_TEXTURE0);
  3. glEnable(GL_TEXTURE_2D);
  4. glBindTexture(GL_TEXTURE_2D, TextureID[0]);
  5. glActiveTexture(GL_TEXTURE1);
  6. glEnable(GL_TEXTURE_2D);
  7. glBindTexture(GL_TEXTURE_2D, TextureID[1]);
  8. glActiveTexture(GL_TEXTURE2);
  9. glEnable(GL_TEXTURE_2D);
  10. glBindTexture(GL_TEXTURE_2D, TextureID[2]);
  11. glActiveTexture(GL_TEXTURE3);
  12. glEnable(GL_TEXTURE_2D);
  13. glBindTexture(GL_TEXTURE_2D, TextureID[3]);
  14.  


Zitat:
Hm, ich weiß nicht ob es eine gute Idee ist die Shader-Objekte freizugeben bevor du das Programm linkst. Allerdings würde ich mal annehmen das dann da eine Fehlermeldung beim Linken kommen würde (und es steht auch so im Tutorial). Ansonsten sieht das eigentlich gut aus.

Mache ich auch immer so. Müsste also funktionieren.

humflo
Nach oben
 Profil  
Mit Zitat antworten  
KSM
 Betreff des Beitrags:
BeitragVerfasst: Sa Aug 08, 2009 11:12 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Daran hab ich auch schon gedacht, hat aber leider auch nicht geholfen :(

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!
Nach oben
 Profil  
Mit Zitat antworten  
KSM
 Betreff des Beitrags:
BeitragVerfasst: Sa Aug 08, 2009 11:31 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Ich habe mal versucht, statt "GL_TEXTURE0" "GL_TEXTURE0_ARB" zu verwenden, leider auch ohne Erfolg ... Brauche ich denn vielleicht glTexEnv?
Oder muss ich statt glTexCoord2f glMultiTexCoord2f bzw. glMultiTexCoord2f verwenden? Wobei ich letzteres auch versucht habe ...

EDIT:

Könnte mir vielleicht jemand einen Quelltext von einem einfachen Shader schicken?

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!
Nach oben
 Profil  
Mit Zitat antworten  
Coolcat
 Betreff des Beitrags:
BeitragVerfasst: Sa Aug 08, 2009 11:50 
Offline
DGL Member
Benutzeravatar

Registriert: Do Dez 29, 2005 12:28
Beiträge: 2249
Wohnort: Düsseldorf
Programmiersprache: C++, C#, Java
Setze mal bitte ein
[glsl]gl_FragColor.a = 1.0;[/glsl]
ans Ende des Fragmentshaders. Dein Alpha-Wert ist sonst undefiniert und könnte bei aktiviertem Blending zu komischen Ergebnissen führen.

Wenn das nicht funktioniert, versuch mal bitte diesen Fragmentshader:
[glsl]uniform sampler2D Texture0;
uniform sampler2D Texture1;
uniform sampler2D Texture2;
uniform sampler2D Texture3;

void main(void)
{
vec2 TexCoord = vec2( gl_TexCoord[0] );
gl_FragColor = vec4(TexCoord.x, TexCoord.y, 0.0, 1.0);
} [/glsl]

Sollte unabhängig von den Texturen einen Farbverlauf geben: eine Ecke Rot, eine Ecke Grün, eine Ecke Schwarz und eine Ecke Gelb.


Edit:

Zitat:
Brauche ich denn vielleicht glTexEnv?

Sofern du sonst nirgendwo in deinem Programm etwas verstellt hast solltest du das nicht brauchen.

Zitat:
Oder muss ich statt glTexCoord2f glMultiTexCoord2f bzw. glMultiTexCoord2f verwenden?

glTexCoord2f müsste reichen.

Zitat:
Könnte mir vielleicht jemand einen Quelltext von einem einfachen Shader schicken?

Ich habe leider nichts derartiges zur Hand, und sowieso kein Delphi ;)

_________________
Yeah! :mrgreen:
Nach oben
 Profil  
Mit Zitat antworten  
KSM
 Betreff des Beitrags:
BeitragVerfasst: Sa Aug 08, 2009 17:48 
Offline
DGL Member
Benutzeravatar

Registriert: Fr Apr 04, 2008 17:24
Beiträge: 30
Ah! Zwar funktioniert leider der alte Shader nicht, aber bei deinem bekomme ich zumindest ein anderes Bild (siehe Screenshot):


Dateianhänge:
Dateikommentar: Neues Bild
Neues Bild.jpg [119.58 KiB]
6-mal heruntergeladen

_________________
Besucht doch mal meine Webseiten xeonlab.com und phoenixsystems.de!
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 2
  [ 19 Beiträge ]  Gehe zu Seite 1, 2  Nächste
Foren-Übersicht » Programmierung » Shader


Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 22 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:  
  Powered by phpBB® Forum Software © phpBB Group
Deutsche Übersetzung durch phpBB.de
[ Time : 0.013s | 15 Queries | GZIP : On ]