2D-Pixel eines Control3D?

[Thom]

[gelöscht]

Sorry - Unfug geschrieben...

Man sollte nicht immer der Onlinehilfe vertrauen. Dort steht zwar zur Funktion TContext3D.WorldToScreen() :

Zitat:

Wandelt einen 2D-Punkt (z.B. Mauskoordinaten) in einen 3D-Punkt in einer Szene um.

Das ist aber falsch: Diese Methode macht, was sie dem Namen nach soll - sie wandelt einen Punkt aus der 3D-Welt in Bildschirmkoordinaten um.

Die Anwendung ist einfach:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  P: TPoint3D;
begin
  P:=Context.WorldToScreen(Cube.Projection,Cube.AbsolutePosition);
  [...]
end;