Forum: Multimedia
by turboPASCAL,
13. Jun 2011
Danke, aber in der Zwischenzeit hab ich es hin bekommen.
Der Trick lag darin die Abfrage gleich hinter einem glLookAt zu setzen.
Forum: Multimedia
by turboPASCAL,
13. Jun 2011
Also ich nutze gluLookAt() als Kamera, die Planeten werden per glTranslatef() auf die Koordinaten gesetzt die ich berechnet habe.
// Planeten Positionen berechnen
for i := 1 to length(Planets) - 1 do
begin
Planets.Pos.X := sin(tc/Planets.rot) * Planets.distance;
Planets.Pos.Y := 0;
Planets.Pos.Z := cos(tc/Planets.rot) * Planets.distance;
end;
Forum: Multimedia
by turboPASCAL,
13. Jun 2011
Naja, die Umrechnung haut nicht hin, siehe Bild oben.
Forum: Multimedia
by turboPASCAL,
13. Jun 2011
Hi,
ich bastle gerade an 'nem kleinem Projekt.
Dabei wollte ich "normalen" Text im 3D-Raum darstellen, was leider nicht so klappen möchte. (siehe Anhang)
Zur "Umrechnung" von 3D zu 2D nutze ich gluProject() was ja die Koordinaten liefern soll, doch leider
ist der Text bzw. die 2D-Koordinaten versetzt. :gruebel:
procedure Get2DCoordFrom3D(Pos3D: TVector_3d; var Pos2D: TVector_3d);
var