Difference between revisions of "VS:VM MoveToLayer"

From VectorMEP
Jump to navigation Jump to search
m
m
Line 1: Line 1:
 
{{DISPLAYTITLE:VS:VM_MoveToLayer}}
 
{{DISPLAYTITLE:VS:VM_MoveToLayer}}
 
 
== Description ==
 
== Description ==
 
Procedure VM_MoveToLayer moves the selected objects to a layer.<syntaxhighlight lang="pascal">
 
Procedure VM_MoveToLayer moves the selected objects to a layer.<syntaxhighlight lang="pascal">

Revision as of 08:54, 16 November 2020

Description

Procedure VM_MoveToLayer moves the selected objects to a layer.

PROCEDURE VM_MoveToLayer(
    h     :Handle);

Parameters

h HANDLE Handle to layer.

Remarks

When nill is passed as Layer handle, a dialog is presented with a list of all Layers to choose from.

Example

PROCEDURE MoveToLayer;
VAR
    h : HANDLE;
BEGIN
    h := NIL; 
    {h := GetObject('LayerName'); in case of predefined layer}
    IF VerifyLibraryRoutine('VM_MoveToLayer') THEN
		BEGIN
			IF (GetType(h) = 31) OR (h = NIL) THEN VM_MoveToLayer(h);
        End
    ELSE
        Message('The routine VM_MoveToLayer is not available.');
END;
RUN(MoveToLayer);

Version

Availability: from VectorMEP 2021