** END HEADER -- do not remove this line
//
// Generated on 2018-11-13
//
parameter bModal
local f
f = new select_fileForm()
if (bModal)
   f.mdi = false // ensure not MDI
   f.readModal()
else
   f.open()
endif

class select_fileForm of FORM
   with (this)
      height = 16.0
      left = 26.7143
      top = 5.6818
      width = 78.4286
      text = ""
   endwith

   this.PUSHBUTTON1 = new PUSHBUTTON(this)
   with (this.PUSHBUTTON1)
      onClick = class::PUSHBUTTON1_ONCLICK
      height = 1.0909
      left = 29.8571
      top = 5.0
      width = 15.2857
      text = "Select File"
   endwith

   this.ENTRYFIELD1 = new ENTRYFIELD(this)
   with (this.ENTRYFIELD1)
      height = 1.0
      left = 7.0
      top = 10.0
      width = 61.0
      value = ""
   endwith

   this.TEXTLABEL1 = new TEXTLABEL(this)
   with (this.TEXTLABEL1)
      height = 1.0
      left = 32.0
      top = 8.5
      width = 18.0
      text = "Selected file"
   endwith


   function PUSHBUTTON1_onClick()
      form.entryfield1.value = getfile()
      return

endclass