Luiz Fernando Posted June 27, 2017 Report Share Posted June 27, 2017 Colegas eu preciso pegar o nome de uma pasta, não estou conseguindo, com a rotina abaixo só da certo se eu selecionar um arquivo, que não é o caso, pois so preciso do nome da pasta na variavel cGet[3] redefine get oGet[3] var cGet[3] pict"@" of oDlg id 103 ; action (cGet[3]:=cGetFile("Arquivo de Licença (*.*) |*.*|" + ; "C:\",; 'EMPRE-SOFT' ),oGet[3]:refresh() ) BITMAP"PASTA" ; color COR_GET1 Obrigado Quote Link to comment Share on other sites More sharing options...
aferra Posted June 27, 2017 Report Share Posted June 27, 2017 cGet[3] := AnsiUPPER( cFileNoPath( cGet[3] ) ) Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted June 27, 2017 Author Report Share Posted June 27, 2017 Alessandro obrigado pela resposta, meu problema que não consigo sair do cGetFile32 sem selecionar arquivo, sempre que usuario for usar esta rotina sera na criação de uma pasta nova, e não vai ter nenhum conteudo, a pasta sempre estara vazia. Obrigado Quote Link to comment Share on other sites More sharing options...
vagner Posted June 27, 2017 Report Share Posted June 27, 2017 Olá, cGetDir ou cGeDir32, não me recordo ao certo. Quote Link to comment Share on other sites More sharing options...
Luiz Fernando Posted June 27, 2017 Author Report Share Posted June 27, 2017 Obrigado Vagner deu certo... 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.