requesters.monkey2 1.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758
  1. Namespace mojo.requesters
  2. #If __TARGET__="desktop"
  3. #Import "native/requesters.h"
  4. #If __HOSTOS__="macos"
  5. #Import "native/requesters.mm"
  6. #else
  7. #Import "native/requesters.cpp"
  8. #if __HOSTOS__="windows"
  9. #Import "<libcomdlg32.a>"
  10. #endif
  11. #endif
  12. Extern
  13. Function Notify:Void( title:String,text:String,serious:Bool=False )="bbRequesters::Notify"
  14. Function Confirm:Bool( title:String,text:String,serious:Bool=False )="bbRequesters::Confirm"
  15. Function Proceed:Int( title:String,text:String,serious:Bool=False )="bbRequesters::Proceed"
  16. Function RequestFile:String( title:String,filter:String="",save:Bool=False,file:String="" )="bbRequesters::RequestFile"
  17. Function RequestDir:String( title:String,dir:String="" )="bbRequesters::RequestDir"
  18. Function OpenUrl( url:String )="bbRequesters::OpenUrl"
  19. #else
  20. Function Notify:Void( title:String,text:String,serious:Bool=False )
  21. End
  22. Function Confirm:Bool( title:String,text:String,serious:Bool=False )
  23. Return False
  24. End
  25. Function RequestFile:String( title:String,filter:String="",save:Bool=False,file:String="" )
  26. Return ""
  27. End
  28. Function RequestDir:String( title:String,dir:String="" )
  29. Return ""
  30. End
  31. Function OpenUrl( url:String )
  32. End
  33. #endif