home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / sampl254.zip / gcc2 / samples / sample3 / getfile.cc next >
Text File  |  1992-04-16  |  659b  |  34 lines
  1.  
  2. #define   INCL_WIN
  3. #include  <os2.h>
  4.  
  5. extern "C"
  6.   {
  7.    #include  <string.h>
  8.   }
  9.  
  10. CHAR    szFileToBrowse[512];
  11.  
  12. BOOL    GetFileToBrowse (HWND      hwndOwner)
  13.   {
  14.    FILEDLG          fild;         // File dialog structure.
  15.  
  16.    memset (&fild, 0, sizeof (FILEDLG));
  17.    fild.cbSize     = sizeof (FILEDLG);
  18.    fild.fl         = FDS_OPEN_DIALOG    |
  19.                      FDS_CENTER;
  20.    fild.pszIDrive  = (PSZ) "C:";
  21.  
  22.    WinFileDlg (HWND_DESKTOP,
  23.                hwndOwner,
  24.                &fild);
  25.  
  26.    if (fild.lReturn == DID_OK)
  27.      {
  28.       strcpy (szFileToBrowse, fild.szFullFile);
  29.       return TRUE;
  30.      }
  31.    return FALSE;
  32.   }
  33.  
  34.