Thema: Delphi glColor4f Konvertieren

Einzelnen Beitrag anzeigen

Benutzerbild von littleDave
littleDave

Registriert seit: 27. Apr 2006
Ort: München
556 Beiträge
 
Delphi 7 Professional
 
#2

Re: glColor4f Konvertieren

  Alt 10. Jun 2008, 14:45
Also die Reihenfolge bzw die Interpretation der Farbwerte (RGB/BGR/usw) lässt sich nicht ändern. Aber du kannst einen Work-Around für dein Problem erstellen
Delphi-Quellcode:
var aColor : DWORD;
begin
  aColor = $397AC4FF;
  glColor4bv(@aColor);
end;
Mit glColor4bv gibst du an, dass 4 Byte-Werte folgen. Mit dem glColor4bv gibst du an, dass du einen Pointer auf einen Speicherbereich übergibst, der die Parameter in der Reihenfolge RGBA hat.

Die Farbwerte in aColor sind jetzt:
$39: Rotanteil zwischen 0 und 255 in hex
$7A: Grünanteil zwischen 0 und 255 in hex
$C4: Blauanteil zwischen 0 und 255 in hex
$FF: Alpha-Wert zwischen 0 und 255 in hex
Jabber: littleDave@jabber.org
in case of 1 is 0 do external raise while in public class of object array else repeat until 1 is 0
  Mit Zitat antworten Zitat