From: neil <serissa@...>
Date: 2001-11-03T20:29:32+09:00
Subject: [ruby-talk:24258] Re: TK: browse for a file

Hi, 
Pick over the bones of this, lifted out of a script I initially
wrote in perl/Tk, and in the process of porting to Ruby.
may be helpful :-)

------------------------------------------------------

  def fileDialog(op,ext,window)

     ftypes = [
                  ["Ruple text files", ext],
                  ["Ruple word files", '*.rwd'],
                  ["Ruple files", '*.rxt *.rwd'],
                  ["Text files", '*.txt'],
                  ["Midi files", '*mid'],
                  ["Backup files", '*~'],
                  ["All files",'*']
     ]
    if op == 'open'
        fname = Tk.getOpenFile('filetypes'=>ftypes, 'parent'=>window)
    else
        fname = Tk.getSaveFile('filetypes' => ftypes,'parent'=>window,
                                        #initialdir => $this_dir,
                                        #'initialfile' => @@title,
                                        'defaultextension' => ext)
    end
    return fname
  end


#Call with something like...

  def file_prepare(open,what)
    file_box = TkFrame.new
    ext = what
    if open
      fname = ftmp = fileDialog('open',ext,file_box)
      unless fname.empty?
       
        <deal with file>
      
      end
    end
  end


Cheers,

Neil