DGL • Thema anzeigen - Bitmap skalieren? Alternative Textdarstellung?

Bitmap skalieren? Alternative Textdarstellung?

Moderator: DGL-Team

Seite 1 von 1

[ 10 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

7eddi

Betreff des Beitrags: Bitmap skalieren? Alternative Textdarstellung?

Verfasst: Mi Dez 20, 2006 17:27

DGL Member

Registriert: Di Sep 27, 2005 21:15
Beiträge: 17

Hallo zusammen,

ich wollte ein paar 2D-Objekte beschriften und habe dies zunächst mit 8x8-Bitmaps und glBitmap getan. Nun passen sich diese natürlich nicht der Auflösung an, aber Skalierungen und Bitmaps schließen sich vermutlich aus, oder gibt es doch einen Weg? Es müsste auch gar nicht unbedingt flüssig sein, zur Not würde es mir reichen, eine 8x8-Bitmap auf eine 16x16, 32x32, usw. -Bitmap abzubilden, solange es nicht zu performance-lastig wird.

Eine andere Lösung wäre natürlich, anstatt der Bitmaps Polygone mit den entsprechenden Zeichen als Textur zu verwenden. Mit dem Alpha-Test erhalte ich aber immer unschöne weiße Fransen und eine Blending-Einstellung, die weiche Übergänge überzeugt, habe ich auch nicht entdeckt.

Was ratet ihr mir?

Danke und Gruß,
Lucas

Nach oben

The-Winner

Betreff des Beitrags:

Verfasst: Mi Dez 20, 2006 18:31

DGL Member

Registriert: Di Jun 06, 2006 09:59
Beiträge: 474

Mit blending geht das einfach:
Farb komplett weiß(Wahrscheinlich kann man den sogar irgendwie weglassen), die Schrift in den Alphakanal. Dann mit standard alphablending rendern. Textfarbe mit glColor festlegen.

Nach oben

Flash

Betreff des Beitrags:

Verfasst: Do Dez 21, 2006 11:17

Guitar Hero

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

Genau so wirds gemacht. Zur beschleunigung kannst du noch nen Alphatest vorschalten der alle komplett transparenten Pixel wegwirft.

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

Nach oben

7eddi

Betreff des Beitrags:

Verfasst: Sa Dez 23, 2006 12:48

DGL Member

Registriert: Di Sep 27, 2005 21:15
Beiträge: 17

Thx, klappt wunderbar. Vielleicht könnt ihr mir dennoch noch einen kleinen Tipp geben, wenn nicht, dann läufts auch so.

Habe den Zeichensatz in eine Textur verpackt (tga), die natürlich nur 1x geladen werden muss. Dies würde ich gerne im Initialization-Part der Unit machen, wo ich die Funktion glWrite zum Text ausgeben definiert habe. Funktioniert nur leider nicht. Bei _glGenTextures(n, textures) in dglOpenGL tritt eine Access Violation (000000000) auf. Lade ich die Textur normal, also nicht im Initialization-Part, läuft alles glatt. Der Initialization-Part von dglOpenGL wird VOR dem meiner glWrite-Unit aufgerufen, daran sollte es also nicht liegen. Wo dann der Unterschied liegt, habe ich noch nicht herausgefunden.
Hier dann der funktionierende Code, ich verwende die Textures.pas von Jan Horn.

Code:

unit u_glwrite;
 
interface
 
procedure glWrite(Str: String; Size: Integer = <!-- s8) --><img src=\"{SMILIES_PATH}/icon_cool.gif\" alt=\"8)\" title=\"Cool\" /><!-- s8) -->;
 
implementation
 
uses
  dglOpenGL,
  Textures;
 
const
  // Textur-Pfad für Schriftzeichen
  FONTTEXPATH = 'images/font.tga';
  // Anzahl der Zeichen in der Textur
  CHARSPERROW = 4;
  CHARSPERCOL = 4;
  // ASCII-Zeichen beschränken
  ASCIILOW = 46;
  ASCIIHIGH = 57;
 
type
  // Speichert Positionsdaten eines Zeichens in der Textur
  TPoint = record
    x,
    y: Single;
  end;
 
var
  FontTexture: glUInt;
  // Initialisierungsvariable
  TexLoaded: Boolean = FALSE;
  // Tabelle, die ASCII-Zeichen auf Positionswerte abbildet
  ASCII2Pos: Array[0..255] of TPoint;
  // Relative Einheiten pro Zeichen auf der Textur
  ColFactor,
  RowFactor: Single;
 
//----------
// Initialisiert die Positionswerte der ASCII-Tabelle
//----------
procedure InitPosTable;
  var
    i: Integer;
begin     
  // Initialisieren
 
  for i := ASCIILOW to ASCIIHIGH do
  begin
    ASCII2Pos[i].x := 3;
    ASCII2Pos[i].y := 3;
  end;
 
 
  // ASCII: 46, Zeichen: .
  ASCII2Pos[46].x := 2;
  ASCII2Pos[46].y := 2;
  // ASCII: 48, Zeichen: 0
  ASCII2Pos[48].x := 0;
  ASCII2Pos[48].y := 0;
  // ASCII: 49, Zeichen: 1
  ASCII2Pos[49].x := 1;
  ASCII2Pos[49].y := 0;
  // ASCII: 50, Zeichen: 2
  ASCII2Pos[50].x := 2;
  ASCII2Pos[50].y := 0;
  // ASCII: 51, Zeichen: 3
  ASCII2Pos[51].x := 3;
  ASCII2Pos[51].y := 0;
  // ASCII: 52, Zeichen: 4
  ASCII2Pos[52].x := 0;
  ASCII2Pos[52].y := 1;
  // ASCII: 53, Zeichen: 5
  ASCII2Pos[53].x := 1;
  ASCII2Pos[53].y := 1;
  // ASCII: 54, Zeichen: 6
  ASCII2Pos[54].x := 2;
  ASCII2Pos[54].y := 1;
  // ASCII: 55, Zeichen: 7
  ASCII2Pos[55].x := 3;
  ASCII2Pos[55].y := 1;
  // ASCII: 56, Zeichen: 8
  ASCII2Pos[56].x := 0;
  ASCII2Pos[56].y := 2;
  // ASCII: 57, Zeichen: 8
  ASCII2Pos[57].x := 1;
  ASCII2Pos[57].y := 2;
 
  // Relativ-Positionen bestimmen
  RowFactor := 1 / CHARSPERROW;
  ColFactor := 1 / CHARSPERCOL;
  for i := ASCIILOW to ASCIIHIGH do
  begin
    ASCII2Pos[i].x := ASCII2Pos[i].x * RowFactor;
    ASCII2Pos[i].y := ASCII2Pos[i].y * ColFactor;
  end;
end;
 
//----------
// Rendert den in Str angegebenen Text
//----------
procedure glWrite(Str: String; Size: Integer = <!-- s8) --><img src=\"{SMILIES_PATH}/icon_cool.gif\" alt=\"8)\" title=\"Cool\" /><!-- s8) -->;
  var
    i,
    d: Integer;
    CharPos: TPoint;
begin
  if not TexLoaded then
  begin
    // Textur laden
    LoadTexture(FONTTEXPATH, FontTexture, FALSE);
    TexLoaded := TRUE;
  end;
  // Zentrieren
  glTranslatef((Length(Str) - 1) * -0.5 * SIZE, 0.0, 0.0);
  // Textur einstellen
  glBindTexture(GL_TEXTURE_2D, FontTexture);
  for i := 1 to Length(Str) do
  begin
    try    
      CharPos := ASCII2Pos[ord(Str[i])];
    except
      // Nicht vorkommendes Zeichen entdeckt
      continue;
    end;
    // Verschiebung
    d := (i - 1) * Size;
    // Zeichnen
    glBegin(GL_QUADS);
      // 0/1
      glTexCoord2f(CharPos.x, CharPos.y + ColFactor);
      glVertex2i(d, Size);
      // 0/0
      glTexCoord2f(CharPos.x, CharPos.y);
      glVertex2i(d, 0);
      // 1/0
      glTexCoord2f(CharPos.x + RowFactor, CharPos.y);
      glVertex2i(d + Size, 0);
      // 1/1
      glTexCoord2f(CharPos.x + RowFactor, CharPos.y + ColFactor);
      glVertex2i(d + Size, Size);
    glEnd;
  end;  
  glBindTexture(GL_TEXTURE_2D, 0);
end;
 
initialization
 
InitPosTable;
 
finalization
 
end.

Nach oben

The-Winner

Betreff des Beitrags:

Verfasst: Sa Dez 23, 2006 23:03

DGL Member

Registriert: Di Jun 06, 2006 09:59
Beiträge: 474

Du kannst OpenGL funktionen erst nach dem initialisieren von OpenGl ausführen. Da du vermutlich im FormCreate initialisierst, kanns du sie in initabschnitten nicht verwenden.

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: So Dez 24, 2006 00:10

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Mir ist noch etwas anderes aufgefallen. Benutzt bitte nicht die Funktionen mit dem Unterstrich. Die gibt es in Wirklichkeit gar nicht. Die wurden nur für .NET eingebaut und es könnte passieren, dass es die irgendwann nicht mehr gibt. Einfach den Unterstrich entfernen das sollte ausreichen.

Nach oben

7eddi

Betreff des Beitrags:

Verfasst: So Dez 24, 2006 13:37

DGL Member

Registriert: Di Sep 27, 2005 21:15
Beiträge: 17

_glGenTextures wurde von mir nur indirekt aufgerufen, denn sie wird in dglOpenGL.pas selbst verwendet. Die Textures.pas verwendet glGenTextures. Wollte damit nur aufzeigen, an welcher Stelle sich das Programm genau aufhängt.

Code:

procedure glGenTextures(n: TGLsizei; textures: PGLuint); overload;
begin
  _glGenTextures(n, textures);
end;

[/pascal]

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: Mo Dez 25, 2006 00:45

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Wollte nur auf Nummer Sicher gehen. ;-)

Nach oben

Gaukler

Betreff des Beitrags:

Verfasst: Mo Dez 25, 2006 02:17

DGL Member

Registriert: Sa Okt 22, 2005 20:24
Beiträge: 291
Wohnort: Frauenfeld/CH

Wie lädst du OpenGL? Ich hatte da auch mal Probleme mit glGenTextures und da habe ich glaubich falsch geladen.

_________________
bester uo-shard: www.uosigena.de

Nach oben

Lossy eX

Betreff des Beitrags:

Verfasst: Mo Dez 25, 2006 12:48

DGL Member

Registriert: Do Dez 05, 2002 10:35
Beiträge: 4234
Wohnort: Dortmund

Ich denke du hast ihn da missverstanden. Der Code den er gepostet hat stammt aus der dglOpenGL. Und das ist ein Workaround für .NET.

Nach oben

Seite 1 von 1

[ 10 Beiträge ]

Foren-Übersicht » Programmierung » OpenGL

Wer ist online?

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