VS:GetPt/ja

.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix

Description

マウスがクリックされるまで待機し、クリックされた点の座標を返します。

PROCEDURE GetPt(
         VAR p   :REAL);

def vs.GetPt():
    return p

Parameters

p

REAL

座標

Example

PROCEDURE Example;
VAR
	pt :POINT;
BEGIN
	GetPt(pt.x, pt.y);
	Message(pt);
END;
RUN(Example);

Version

利用可能バージョン: MiniCAD