ENTRY OnNewLayerEx(IN INT _refId,_newLayer, INT _x1,_y1,_x2,_y2, IN INT _x3,_y3, BOOL _enable) ; akcie END OnNewLayerEx |
_refId | Vstupný parameter typu Int. refID objektu, nad ktorým je kurzor myši alebo 0. |
_newLayer | Vstupný parameter typu Int. Číslo novej vrstvy. |
_x1,_y1,_x2,_y2 | Vstupno-výstupný parameter typu Int. Viditeľná výsledná oblasť po zmene vrstvy. |
_x3,_y3 | Vstupný parameter, pozícia kurzora myši v schéme. |
_enable | Výstupný parameter typu BOOL. Povolenie zmeniť vrstvu. |
ENTRY OnNewLayerEx(IN INT _refId, _layers, INT _x1,_y1,_x2,_y2, IN INT _x3,_y3, BOOL _enable) IF _layers=2 THEN _x1 := 100 _y1 := 100 _x2 := 500 _y2 := 500 ENDIF _enable := @TRUE END OnNewLayerEx |