VS:GetRoofFaceAttrib/ja

From Vectorworks Developer
Jump to navigation Jump to search
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.

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

Description

ハンドルで指定した屋根の属性を返します。

PROCEDURE GetRoofFaceAttrib(
roofFace :HANDLE;
VAR roofRise :REAL;
VAR roofRun :REAL;
VAR miterType :INTEGER;
VAR holeStyle :INTEGER;
VAR vertPart :REAL;
VAR thickness :REAL);
def vs.GetRoofFaceAttrib(roofFace):
    return (roofRise, roofRun, miterType, holeStyle, vertPart, thickness)

Parameters

roofFace HANDLE 屋根のハンドル
roofRise REAL 上方への距離
roofRun REAL 前方への距離
miterType INTEGER 端部の形状
holeStyle INTEGER 穴の種類
vertPart REAL 垂直方向の厚み
thickness REAL 屋根の厚み

Example

PROCEDURE Example;

PROCEDURE ShowRoofFaceAttrib(roofFace :HANDLE);
VAR
	roofRise, roofRun :REAL; 
	miterType, holeStyle :INTEGER; 
	vertPart, thickness :REAL;
BEGIN
	IF GetObjectVariableInt(roofFace, 172) = 1 THEN BEGIN
		GetRoofFaceAttrib(roofFace, roofRise, roofRun, miterType, holeStyle, vertPart, thickness);
		Message('roofRise: ', roofRise,
			',  roofRun: ', roofRun,
			',  miterType: ', miterType,
			',  holeStyle: ', holeStyle,
			',  vertPart: ', vertPart,
			',  thickness: ', thickness);
	END;
END;

BEGIN
	ForEachObject(ShowRoofFaceAttrib, ((SEL=TRUE)&(T=71)));
END;
RUN(Example);

Version

利用可能バージョン: VectorWorks9.0