How to get Windows standard "Save As" dialogue box

Board index FiveWin for Harbour/xHarbour How to get Windows standard "Save As" dialogue box

hua

Posts: 1096

Joined: Fri Oct 28, 2005 02:27 AM

How to get Windows standard "Save As" dialogue box
Posted: Sun Mar 01, 2009 05:32 PM

I can't remeber right now how this is done. Is it by calling cGetFile() and passing some flags?

TIA.

FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour

mmercado

Posts: 782

Joined: Wed Dec 19, 2007 07:50 AM

Re: How to get Windows standard "Save As" dialogue box
Posted: Sun Mar 01, 2009 06:25 PM

hua wrote:I can't remeber right now how this is done. Is it by calling cGetFile() and passing some flags?

Hi Hua:

Here you are a little working sample:

Code (fw): Select all Collapse

#include "FiveWin.ch"

Function Main()

   Local cNewName, ;
         cMask     := "Databases (*.dbf)|*.dbf|All files (*.*)|*.*", ;
         cTitle    := "Select the database", ;
         cFolder   := "c:\fwh\samples", ;
         cFilename := "customer.dbf", ;
         lSave     := .T.

   cNewName := cGetFile( cFilter, cTitle,, cFolder, lSave,,, cFileName )
   ?cNewName

Return Nil

Regards

Manuel Mercado

manuelmercado at prodigy dot net dot mx

hua

Posts: 1096

Joined: Fri Oct 28, 2005 02:27 AM

Re: How to get Windows standard "Save As" dialogue box
Posted: Mon Mar 02, 2009 01:26 AM

Thank you Manuel.

FWH 11.08/FWH 19.12

BCC5.82/BCC7.3

xHarbour/Harbour

FiveTech Support Forums

Continue the discussion