VS:IsLWByClass/ja

From Vectorworks Developer
Jump to navigation Jump to search

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

Description

ハンドルで指定した図形の線の太さが、クラス属性を使用していた場合はTRUEを返します。

FUNCTION IsLWByClass(
h :HANDLE) : BOOLEAN;
def vs.IsLWByClass(h):
    return BOOLEAN

Parameters

h HANDLE 図形のハンドル

Return Value

クラス属性を使用していた場合はTRUE

Example

PROCEDURE Example;
VAR
   symDefHandle, h :HANDLE;

PROCEDURE AlertMe;
BEGIN
   Message(GetSDName(symDefHandle));
   SetSelect(h);
END;

BEGIN
   DSelectAll;
   ClrMessage;
   symDefHandle := FSymDef;
   WHILE symDefHandle <> NIL DO BEGIN
      h := FInSymDef(symDefHandle);
      WHILE h <> NIL DO BEGIN
         IF IsLWByClass(h) THEN AlertMe;
         h := NextObj(h);
      END;
      symDefHandle := NextObj(symDefHandle);
   END;
END;
RUN(Example);

Version

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