Using CreateThread() function ?
Code: Select all
  Open_Window()
  Repeat     
    Event  = WaitWindowEvent()   
    If Event  = #PB_EventGadget     
      GadgetID  = EventGadgetID()    
      If GadgetID = #Create
        MyLongDurationFunction()
      EndIf     
    EndIf   
  Until Event  = #PB_EventCloseWindow 
