BEGIN
ALIAS _newGraph
INT _newGraphHBJ
COPYOBJECT D.graf, "D.novyGraf", _newGraph
IF _newGraph\HBJ = 0 THEN
ELSE
OPEN _newGraph ON srvskolv.HIP ;otvorenie grafu
DELAY 2[s] ;zdržanie vykonávania skriptu na 2 sekundy
CLOSE _newGraph ON srvskol1v.HIP ;zatvorenie grafu
_newGraphHBJ := _newGraph\HBJ
DELETEOBJECT _newGraphHBJ ;odstránenie grafu
ENDIF
END
Pridať komentár