Delphi持ってるならGLSceneを使え

Delphi持ってるならGLSceneを使え at TECH

46:デフォルトの名無しさん
07/01/23 00:48:04
>>44
publishedじゃないけど、AbsolutePositionプロパティ（TVector型）があるよ。
TVector型は配列になっていて、
(X,Y,Z) = (AbsolutePosition[0], AbsolutePosition[1], AbsolutePosition[2])
となっています。
・・・以下、使用例。GLCube1の位置について、GLCube2からの相対座標を割り出す。

usesに「VectorGeometry」を追加（TVectorが定義されている）
//GLCube1の絶対座標をGLCube2の相対座標にする。
var
LocalPosition:TVector;
begin
LocalPosition:=GLCube2.AbsoluteToLocal(GLCube1.AbsolutePosition);
end;

次ページ

続きを表示

1を表示