-- Gambas.JochenGeorges - 24 Dec 2004

How to save and open files with a dialog


mydialog.png
' Gambas class file

PUBLIC SUB Button1_Click()
  IF Dialog.OpenFile() THEN RETURN
  Label1.Text = Dialog.Path
  TextArea1.Text = File.Load(Dialog.Path)
END

PUBLIC SUB Button2_Click()
  IF Dialog.SaveFile() THEN RETURN
  File.Save(Dialog.Path, TextArea1.Text)
END