' Gambas module file

Public Sub Main()

  ' Dialog.FilterIndex = 1
  ' Dialog.Filter = ["*.jpg;*.jpeg;*.gif;*.png", "Images", "*.pdf", "Pdf files"]
  ' Dialog.SaveFile()
  ' Print Dialog.FilterIndex
  
  'Style.BorderFlat = True
  'Dialog.Font = Font["GambasRound"]
  Dialog.SelectFont

End

