Positionierung GLScene

[Uwe Raabe]

Delphi-Quellcode:

var
  matrix: TMatrix;
  saveParent: TGLBaseSceneObject;
begin
  DummyCube2.ResetRotations;
  DummyCube2.Position.SetToZero;
  saveParent := DummyCube1.Parent;
  DummyCube1.Parent := DummyCube2;
  DummyCube2.PitchAngle := 30; 
  matrix := DummyCube1.AbsoluteMatrix;
  DummyCube1.Parent := saveParent;
  DummyCube1.AbsoluteMatrix; // wegen eines Bugs in GLScene muss hier die Matrix neu aufgebaut werden
  DummyCube1.AbsoluteMatrix := matrix;
end;

Besser wäre es aber, du baust das Drehgelenk gleich fest in die Hierarchie ein.