OBSOLETE for VW2008: Use GetObjBeginningMarker and/or GetObjEndMarker instead. Returns marker information on the referenced object.
PROCEDURE GetMarker(
h : HANDLE;
VAR start : BOOLEAN;
VAR end : BOOLEAN;
VAR style : INTEGER;
VAR size : REAL);def vs.GetMarker(h):
return (start, end, style, size)| Name | Type | Description |
|---|---|---|
| h | HANDLE | Handle to the object. |
| start | BOOLEAN | True if a marker is visible at start of object. |
| end | BOOLEAN | True if a marker is visible at end of object. |
| style | INTEGER | Marker style: |
| size | REAL | Size of marker. |
OBSOLETE for VW2008: Use GetObjBeginningMarker and/or GetObjEndMarker instead. For a one inch marker pass in a size value equal to 16384. If you pass NIL for the obj parameter, this call will set the marker defaults for this document. angle must be in range 0 to 90 degrees.
PROCEDURE CheckMarker;
VAR
h: HANDLE;
MarkerStyle: INTEGER;
StartMark, EndMark: BOOLEAN;
Size: REAL;
BEGIN
h := FSActLayer;
GetMarker(H, StartMark, EndMark, MarkerStyle, Size);
Message('StartMark: ', StartMark, ' EndMark:', EndMark, ' MarkerStyle:', MarkerStyle, ' Size:', Size);
END;
RUN(CheckMarker);def CheckMarker():
h = vs.FSActLayer()
StartMark, EndMark, MarkerStyle, Size = vs.GetMarker(h)
vs.Message('StartMark: ', StartMark, ' EndMark:', EndMark, ' MarkerStyle:', MarkerStyle, ' Size:', Size)
CheckMarker()VS Functions:
GetMarker is obsolete as of VectorWorks 13.0
Availability: from VectorWorks 10.0