ram_bh Posted April 17, 2010 Report Share Posted April 17, 2010 Todos bem? Tem como informar o diretório inicial na função CurDir()? Exemplo: preciso recuperar um arquivo que é gravado em um diretório padrão (\arquivos\gravados\) e ao chamar a função cGetFile() quero posicionar sempre neste diretório para o usuário escolher o arquivo. cArquivo := cGetFile( "Arquivo a ser processado", "Selecione um arquivo", CurDir(-informar o diretório-) ) Obrigado! Rodrigo Melo Belo Horizonte Quote Link to comment Share on other sites More sharing options...
ram_bh Posted April 17, 2010 Author Report Share Posted April 17, 2010 Todos bem? Tem como informar o diretório inicial na função CurDir()? Exemplo: preciso recuperar um arquivo que é gravado em um diretório padrão (\arquivos\gravados\) e ao chamar a função cGetFile() quero posicionar sempre neste diretório para o usuário escolher o arquivo. cArquivo := cGetFile( "Arquivo a ser processado", "Selecione um arquivo", CurDir(-informar o diretório-) ) Obrigado! Rodrigo Melo Belo Horizonte Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted April 17, 2010 Report Share Posted April 17, 2010 Ola Rodrigo.. veja se é isso que vc. quer.. Local cDirName := cGetDir( "Selecione uma pasta para trocar","C:\Pasta\SubPasta",; CurDrive() + ":\" + GetCurDir() )id=code>id=code>Abraços.. Luiz Arruda - Corumba(MS) FiveWin Desde 2004id=blue> [x]Harbour xDev WS ico.corumba@gmail.com ico67@msn.com - NÃO ABANDONE SEU TÓPICO id=blue> Retorne avisando se a dica funcionou Quote Link to comment Share on other sites More sharing options...
ram_bh Posted April 17, 2010 Author Report Share Posted April 17, 2010 Luiz, O que preciso é solicitar ao usuário que escolha o arquivo a ser processado e quero abrir sempre na mesma pasta (\arquivos\gravados). Tenho como passar como parâmetro o diretório? Quote Link to comment Share on other sites More sharing options...
Theotokos Posted April 17, 2010 Report Share Posted April 17, 2010 Os parametros da função sao: cGetFile( , , [], [], [], [], [], [] ) e/ou cGetFile32( , , [], [], [lSave], [nFlags], [cInitialFile] ) Ex: cArquivo := cGetFile32( "Arquivos a ser Processado | *.* |","Selecione um Arquivo",1,CurDir()+":\arquivos\gravados" ) Em Cristo! com Maria!!! Rone O. Coura ************************ xHarbour + BCC55 + FiveWin + xDevStudio ************************ A pessoa que pensa que sabe alguma coisa, ainda não tem a sabedoria que precisa. (1 Cor 8, 2) Quote Link to comment Share on other sites More sharing options...
ram_bh Posted April 17, 2010 Author Report Share Posted April 17, 2010 Obrigado! Resolvido. Foi manota minha. cArquivo := cGetFile( "*.rem", "Selecione um arquivo de remessa","*.REM", CurDrive() + ":\Arquivos\Gravados\" ) Um abraço! Rodrigo Melo Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.