ENTRY OnNewLayerEx(IN INT _refId,_newLayer, INT _x1,_y1,_x2,_y2, IN INT _x3,_y3, BOOL _enable)
; akcie
END OnNewLayerEx
Parametre
_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.
Popis
Udalosť je generovaná pred zmenou vrstvy v schéme. Na rozdiel od udalosti OnNewLayer, ktorá iba informuje o zmene vrstvy, umožňuje aktívne riadiť spôsob zmeny viditeľnej vrstvy.
Obsluha udalosti môže prepnutie vrstvy zakázať alebo povoliť nastavením výstupného parametra
_enable.
Ak sa prepnutie vrstvy nepovolí, tak schéma zmení zoom a nedôjde k prepnutiu vrstvy. Výstupné parametre nie sú použité.
Ak sa prepnutie vrstvy povolí, tak schéma zmení zobrazovanú vrstvu a nastaví viditeľný výrez podľa výstupných parametrov
[x1, y1] [x2, y2]. V najjednoduchšom prípade obsluha udalosti len povoľuje prepnutie a nemení hodnoty určujúce viditeľný výrez po prepnutí.
Príklad
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
Pridať komentár