VS:GetLayerElevation/ja
.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix
Description
ハンドルで指定したレイヤの高さ(Z)と厚み(ΔZ)を返します。
PROCEDURE GetLayerElevation(
h :HANDLE;
VAR baseElev :REAL;
VAR thickness :REAL);
def vs.GetLayerElevation(h): return (baseElev, thickness)
Parameters
h HANDLE レイヤのハンドル baseElev REAL 高さ(Z) thickness REAL 厚み(ΔZ)
Example
PROCEDURE Example; VAR h :HANDLE; baseElev, thickness :REAL; BEGIN h := FLayer; WHILE h <> NIL DO BEGIN GetLayerElevation(h, baseElev, thickness); thickness := thickness / (25.4 / GetPrefReal(152)); AlrtDialog(Concat('layer name: ', GetLName(h), ', baseElev: ', baseElev, ', thickness: ', thickness)); h := NextLayer(h); END; END; RUN(Example);
Version
See Also
関連関数:
関連関数:
[[VS:SetLayerElevation]]