Skip to content

Latest commit

 

History

History
58 lines (48 loc) · 1.49 KB

File metadata and controls

58 lines (48 loc) · 1.49 KB

SetLSByClass

Description

Procedure SetLSByClass sets the referenced object to use the class attribute line style.

PROCEDURE SetLSByClass(h : HANDLE);
def vs.SetLSByClass(h):
    return None

Parameters

Name Type Description
h HANDLE Handle to object.

Remarks

Sets so that the class line style is used for the object referenced by h. [sd 8/19/98]

Examples

	SetLW(LNewObj,kThinLine);
IF IsLineStyleByClass THEN SetLSByClass( LNewObj );
HMoveBackward(LNewObj, TRUE);
MoveTo(X,Y);
LineTo(X,Y+Length);
	IF IsLineStyleByClass THEN SetLSByClass( LNewObj );

IF attrNum [4] THEN SetLSByClass (objectH)
ELSE IF option = 2 THEN SetLSN (objectH, FPenPatN);

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 );
def SetAttrsByClass( objH, setLineWeight = True ):
	vs.SetFillColorByClass( objH )
	vs.SetFPatByClass( objH )
	vs.SetLSByClass( objH )
	if setLineWeight:
		vs.SetLWByClass( objH )
	vs.SetMarkerByClass( objH )
	vs.SetPenColorByClass( objH )

Version

Availability: from VectorWorks8.0

Category