' Gambas module file

Public Sub Main()

  ' Dialog.FilterIndex = 1
  ' Dialog.Filter = ["*.jpg;*.jpeg;*.gif;*.png", "Images", "*.pdf", "Pdf files"]
  ' Dialog.SaveFile()
  ' Print Dialog.FilterIndex
  
  Dialog.AskPassword

End

