Brightsign Object Reference Manual (FW 5.1) Uživatelský manuál Strana 319

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 341
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 318
311
print "Another event arrived: "; type(ev)
end if
end while
End Sub
Example: This code creates a timer that triggers every minute using wildcards in the timer spec.
st=CreateObject("roSystemTime")
timer=CreateObject("roTimer")
mp=CreateObject("roMessagePort")
timer.SetPort(mp)
timer.SetDate(-1, -1, -1)
timer.SetTime(-1, -1, 0, 0)
timer.Start()
while true
ev = Wait(0, mp)
if (type(ev) = "roTimerEvent") then
print "timer event received"
else
print "unexpected event received"
endif
endwhile
Zobrazit stránku 318
1 2 ... 314 315 316 317 318 319 320 321 322 323 324 ... 340 341

Komentáře k této Příručce

Žádné komentáře