Function IsLWByClass returns whether a class line weight is used for the referenced object.
FUNCTION IsLWByClass(h : HANDLE): BOOLEAN;def vs.IsLWByClass(h):
return BOOLEAN| Name | Type | Description |
|---|---|---|
| h | HANDLE | Handle to object. |
Returns an indication of whether the class line weight is used for the object referenced by h. [sd 8/19/98]
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);Availability: from VectorWorks8.0