36 lines · 1.2 KB · Text
RawDownload
= selectfile: file browser     include "selectfile.m";    selectfile := load Selectfile Selectfile->PATH;     init:        fn();    filename: fn(ctxt: ref Draw->Context, parent: ref Draw->Image,                   title: string,                   pat: list of string,                   dir: string): string; Selectfile  provides an interactive file browser for use by awm(1) application.  It allows a user to browse the file  sys‐tem to select a file of a give type. Init  should be called once to initialise the module's inter‐nal state. Filename makes a dialog panel for selecting a  file.   It  iscreated in the graphics context ctxt, near the northeast cor‐ner of a given parent window,  parent,  represented  by  thatwindow's  Image.   (If  the parent window is a Tk Toplevel t,for instance, the appropriate value is t.image.)   If  parentis  nil,  the  panel is centred on the screen.  Dir gives thedirectory where the file search  should  begin.   Only  filesthat  match  pat  are  displayed.  The returned string is thename of the selected file, or the empty string if no file wasselected. == source/appl/lib/selectfile.b == see ALSOdialog(2),   dividers(2),  draw-context(2),  tabs(2),  tk(2),wmlib(2)