Procedure SetLWByClass sets the referenced object to use the class attribute line weight.
PROCEDURE SetLWByClass(h : HANDLE);def vs.SetLWByClass(h):
return None| Name | Type | Description |
|---|---|---|
| h | HANDLE | Handle to object. |
Sets so that the class line weight is used for the object referenced by h.
IF attrNum [5] THEN SetLWByClass (objectH)
ELSE IF option = 2 THEN SetLW (objectH, FPenSize);
IF tmpStruct.NotesFormat.penColByClass THEN SetPenColorByClass( gnH )
ELSE SetPenFore( gnH, tmpStruct.NotesFormat.PenFore.red, tmpStruct.NotesFormat.PenFore.green, tmpStruct.NotesFormat.PenFore.blue );
IF tmpStruct.NotesFormat.LSByClass THEN SetLSByClass( gnH )
ELSE SetLSN( gnH, tmpStruct.NotesFormat.lineStyle );
IF tmpStruct.NotesFormat.LWByClass THEN SetLWByClass( gnH )
ELSE SetLW( gnH, tmpStruct.NotesFormat.lineWeight );
IF IsLWByClass(ActiveParmHand) THEN
SetLWByClass(DupPath)
ELSE
BEGIN
lw := GetLW(ActiveParmHand);
SetLW(DupPath, lw);
END;if vs.IsLWByClass(gObjHandle):
vs.SetLWByClass(hObjectHand)
else:
nLineWeight = vs.GetLW ( gObjHandle )
vs.SetLW( hObjectHand, nLineWeight )
if setLineWeight:
vs.SetLWByClass( objH )Availability: from VectorWorks8.0