Procedure PenPatN sets the active pen pattern (line style) for the document.
If patNumber is in the range 0 to 71 the linestyle will be set to the corresponding fill pattern. A negative value, will set the linestyle to the line type resource whose index is the negative of the value.
PROCEDURE PenPatN(patNumber : LONGINT);def vs.PenPatN(patNumber):
return None| Name | Type | Description |
|---|---|---|
| patNumber | LONGINT | Pattern/linestyle ID value. |
[[User:CBM-c-|c]] (2016.02.29): VS:FPenPatN requires a name list index, while the older routine VS:PenPat requires the dash style index. Please mind that a document doesn't necessarily have dash styles loaded.
PenPatN(-Name2Index('ISO-02 Dashed')); { makes 'ISO-02 Dashed' as the active pen pattern }
PenPatN(25);
{ uses fill pattern 25 as the active pen pattern }
indx := Name2Index('ISO-02 Dashed');
PenPatN(-indx);
{ makes 'ISO-02 Dashed' as the active pen pattern }VS Functions: FPenPatN
Availability: from Vectorworks 2013
- Document Attributes