** END HEADER -- do not remove this line
//
// Generated on 2021-06-23
//
parameter bModal
local f
f = new close_on_idle_mainForm()
if (bModal)
   f.mdi = false // ensure not MDI
   f.readModal()
else
   f.open()
endif

class close_on_idle_mainForm of CLOSE_ON_IDLE from "close_on_idle.cfm"
   with (this)
      onOpen = class::FORM_ONOPEN
      height = 406.0
      left = 190.0
      top = 14.0
      width = 437.0
      topMost = true
   endwith

   this.PUSHBUTTON1 = new PUSHBUTTON(this)
   with (this.PUSHBUTTON1)
      onClick = class::PUSHBUTTON1_ONCLICK
      height = 34.0
      left = 168.0
      top = 197.0
      width = 107.0
      text = "Open readmodal form"
   endwith


   function PUSHBUTTON1_onClick()
      form.oSub = new close_on_idle_subForm()
      form.oSub.mdi := false
      form.timer.enabled = false
      form.textlabel1.text = '' 
      form.oSub.readmodal()
      form.oSub = null
      form.timer.seconds = seconds()
      form.timer.enabled = true
      return

   function form_onOpen()
      close_on_idle::form_onOpen()
      form.timer.allow_idle_time := 20
      set procedure to close_on_idle_sub.wfm
      return

endclass