; obsluha udalostí: Stačenie tlačidla myši nad ľubovolným posuvným
; tlačidlom, ktoré nemá definovanú špeciálnu obsluhu
ENTRY OnSpin(IN INT _refId)
; _refId - hodnota referenčnej lokálnej premennej schémy,
; ktorá je pripojená ku grafickému objektu
IF _refId = _Spin THEN ; test ktorý určí, nad ktorým
; posuvným tlačidlom bola stlačená myš
; akcie
ENDIF
END OnSpin
Pridať komentár