Das Ergebnis ist doch korrekt. Die Ebene, die du durch deine 3 Punkte beschreibst liegt plan in der Z-Ebene, und dein Vektor geht durch die Z-Ebene - sogar senkrecht. Alles richtig.
Es gibt nur kein Ergebnis, wenn Ebene und Vektor parallel zueinander sind. Zum Beispiel:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
LPoint : TPoint3D;
begin
LPoint := intersectPlaneLine(
Point3d(100,100,100),
Point3d(200,200,100),
Point3d(200,100,100),
Point3d(0,0,0),
Point3d(1,0,0)
)
end;
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)