ask-user-for-new-pathname

Arguments: prompt &key initial-name initial-directory stream allowed-types multiple-p change-current-directory-p warn-if-exists-p share-aware-p default-extension

This function provides the service of prompting for one or more new pathnames. It displays a file choice dialog which can be used to specify the directory component. Typing the new name into the File field specifies the filename.

If multiple-p is nil (the default), returns the pathname of the selected file, or nil if none was chosen. If multiple-p is true, returns a list of pathnames of the selected files (even if only one is selected) or nil if none is selected. prompt should be a string explaining what is to be done with the selected file (e.g. "Select new filename for file").

The arguments are:

• initial-name: the filename shown initially for selection. It can be any relative filename with respect to the initial directory (the value of :host). If nil or "" (the empty string), the initial name will appear as the currently allowed type, such as "*.cl". The default is "". A non-nil value may be either a namestring or a pathname object.
• initial-directory: the initial directory from which to select the file or from which to change directory. If this value is unsupplied, the default depends on the value of the context-sensitive-default-path configuration property, but in most cases the most recent value is used. The value of *default-pathname-defaults* is used initially. In earlier releases, this argument was called host. host is still accepted in place of initial-directory. Do not specify both.
• allowed-types: specifies what types of files appear in the dialog's list of existing files. The value is a list where each member specifies one of the choices in the drop-down list of file type choices. Each list member is a cons of (1) the string to appear in the list of file type choices and (2) a string of the form "*.foo;*.bar;..." that indicates the file type(s) that it represents. The first choice is the one that is initially in effect. For example, the value (("Text Files" . "*.txt")("Pixmap Files" . "*.bmp;*.jpg;*.jpeg")) would initially display all files whose type is "txt", and also allow the user to select the second choice to instead display all files of the types "bmp", "jpg", and "jpeg". (Users can always type in some other file if desired.) The default value of this argument is (("All files" . "*.*")) to display all files. (In releases prior to 7.0, the default was the value of the variable cg:*edit-allowed-types*. That variable is no longer supported and the default is now built in.)
• change-current-directory-p: a Boolean which, if true, changes the Microsoft Windows current directory to be the final selected directory when you exit or cancel the dialog. If nil, the current directory is left unchanged. Default is nil.
• multiple-p: a Boolean which, if true, allows the user to name more than one file; the list of selected pathname strings is returned. If nil, only one file may be selected and the returned value is a pathname string or nil, if the user cancels the dialog. The default is nil.

  It is not clear how useful this option is but we include it because the operating system allows it. Users have to type the filenames into a dialog. Multiple filenames must be enclosed in double quotes and be space delimited ("foo.cl" "c:\tmp\bar.fasl").

  Note: there is a buffer that holds the chosen pathnames. An error will be signaled if the buffer is too small to hold the multiple chosen pathnames. (Since the user must type in the filenames, we suspect this will not be a problem for this function. The default buffer is sufficient to hold 12 pathnames of maximum length, that is about 3000 characters.) The size of the buffer can be increased. See file-selection-buffer-size.

• share-aware-p: a Boolean which controls whether a file that is currently opened by another application can be selected. If nil (the default), the file cannot be selected. If true, the file can be selected.
• stream: specifies the parent window for the dialog that pops up. Defaults to the stream returned by selected-window-or-screen. See screen and *system*.
• warn-if-exists-p: a Boolean which, if true, pops up a warning dialog if the user selects a file that already exists. If nil, returns the existing filename string without complaint. Default is t.
• default-extension: the value should be either nil or a string that names a default pathname extension. This value is used only if the end user has selected an allowed type such as "All Files (*.*)" on the file selection dialog that does not specify a particular type, and they type in a filename with no extension. In that case, the pathname returned by this function will have default-extension as its pathname-type. An exception is that if default-extension is the null string, it will result in a pathname whose type is nil rather than the null string, just as if default-extension were nil.

This function uses the standard Common Dialog supplied by Windows for file selection. Internal Allegro CL file selection dialogs use this function. See ask-user-for-existing-pathname and ask-user-for-directory. See also file-selection-buffer-size.

Copyright (c) 1998-2008, Franz Inc. Oakland, CA., USA. All rights reserved.
This page has had moderate revisions compared to the 7.0 page.
Created 2007.4.30.