class blink_text(parentObj) of TEXT(parentObj) custom

   with (this)
         onOpen = class::TEXT_ONOPEN
         onClose = class::TEXT_ONCLOSE
         height = 1.0
         left = 6.0
         top = 3.0
         width = 12.0
         text = "Blink text"
      endwith
      
      function TEXT_onClose()
         this.timer.enabled = false
         return

      function TEXT_onOpen()
         this.timer = new Timer( ) 
         this.timer.parent = this 
         this.timer.onTimer = this.blink
         this.timer.interval = 0.5 
         this.timer.enabled = true 
         return
         
      function blink
         this.parent.visible = not this.parent.visible 
         return  

endclass<br />
<b>Warning</b>:  Unknown: write failed: No space left on device (28) in <b>Unknown</b> on line <b>0</b><br />
<br />
<b>Warning</b>:  Unknown: Failed to write session data (files). Please verify that the current setting of session.save_path is correct () in <b>Unknown</b> on line <b>0</b><br />