Back to index

plt-scheme  4.2.1
Functions
FileDialog.cc File Reference
#include "wx.h"

Go to the source code of this file.

Functions

char * wxsFileDialog (char *message, char *default_path, char *default_filename, char *default_extension, int is_put, wxWindow *parent)
char * wxFileSelector (char *message, char *default_path, char *default_filename, char *default_extension, char *WXUNUSED(wildcard), int flags, wxWindow *parent, int, int)
char * wxLoadFileSelector (char *WXUNUSED(what), char *extension, char *default_name, wxWindow *parent)
char * wxSaveFileSelector (char *WXUNUSED(what), char *extension, char *default_name, wxWindow *parent)

Function Documentation

char* wxFileSelector ( char *  message,
char *  default_path,
char *  default_filename,
char *  default_extension,
char *  WXUNUSEDwildcard,
int  flags,
wxWindow parent,
int  ,
int   
)

Definition at line 36 of file FileDialog.cc.

{
  return wxsFileDialog(message, default_path, default_filename, default_extension, 
                     (flags & wxSAVE), parent);
}

Here is the call graph for this function:

Here is the caller graph for this function:

char* wxLoadFileSelector ( char *  WXUNUSEDwhat,
char *  extension,
char *  default_name,
wxWindow parent 
)

Definition at line 44 of file FileDialog.cc.

{
    char wild[60];
    if (*extension == '.')  ++extension;
    sprintf(wild, "*.%s", extension);
    return wxFileSelector("Load file", NULL, default_name,
                       (char*)extension, wild, 0, parent, 0, 0);
}

Here is the call graph for this function:

char* wxSaveFileSelector ( char *  WXUNUSEDwhat,
char *  extension,
char *  default_name,
wxWindow parent 
)

Definition at line 54 of file FileDialog.cc.

{
    char wild[60];
    if (*extension == '.')  ++extension;
    sprintf(wild, "*.%s", extension);
    return wxFileSelector("Save file", NULL, default_name,
                       (char*)extension, wild, wxSAVE, parent, 0, 0);
}

Here is the call graph for this function:

char* wxsFileDialog ( char *  message,
char *  default_path,
char *  default_filename,
char *  default_extension,
int  is_put,
wxWindow parent 
)

Definition at line 2570 of file wxscheme.cxx.

{
  Scheme_Object *a[6], *r;
  
  a[0] = !message ? scheme_false : scheme_make_utf8_string(message);
  a[1] = !parent ? scheme_false : objscheme_bundle_wxWindow(parent);
  a[2] = !default_path ? scheme_false : scheme_make_path(default_path);
  a[3] = !default_filename ? scheme_false : scheme_make_path(default_filename);
  a[4] = !default_extension ? scheme_false : scheme_make_utf8_string(default_extension);
  a[5] = scheme_null;

  r = scheme_apply(is_put ? put_file : get_file, 6, a);

  if (SCHEME_FALSEP(r))
    return NULL;
  else
    return SCHEME_BYTE_STR_VAL(r);
}

Here is the call graph for this function:

Here is the caller graph for this function: