ドラッグしてオブジェクトを移動させる
Posted: 2007年9月20日(木) 18:02
ＤｉｒｅｃｔＸ講座の、「FPSを表示しよう」のを改良して物体をマウスで動くようにしました。
教えてください。
[ここをクリックすると内容が表示されます]
これを、ドラッグで物体を移動させたいのですが、どう変更すればいいのですか？Sleep(50)
Dim cursor As POINTAPI
GetCursorPos(cursor)
Dim VectorDirection As D3DVECTOR
VectorDirection.x=-(cursor.y-240)/70
VectorDirection.y=-(cursor.x-320)/90
VectorDirection.z=0
Dim cursor As POINTAPI
GetCursorPos(cursor)
Dim VectorDirection As D3DVECTOR
VectorDirection.x=-(cursor.y-240)/70
VectorDirection.y=-(cursor.x-320)/90
VectorDirection.z=0
教えてください。