Descrição
| Apresenta uma janela com os diretórios disponíveis, na estação e no servidor, e retorna o nome do item. |
Sintaxe
| cGetFile( <cMascara>, <cTitulo>, <nMascpadrao>, <cDirinicial>, <lSalvar>, <nOpcoes>, <lArvore>, <lKeepCase> ) |
Parâmetros
| Par | Nome | Tipo | Descrição | Default | Obg | Ref |
| 01 |
cMascara |
Caracter |
Indica o nome do arquivo ou máscara |
X | ||
| 02 | cTitulo |
Caracter |
Indica o título da janela. Caso o parâmetro não seja especificado, o título padrão será apresentado |
|||
| 03 | nMascpadrao |
Numérico |
Indica o número da máscara |
|||
| 04 | cDirinicial |
Caracter |
Indica o diretório inicial |
|||
| 05 | lSalvar |
Boolean | Indica se é um "save dialog" ou um "open dialog |
|||
| 06 | nOpcoes |
Numérico |
Indica a opção de funcionamento. Para mais informações das funcionalidades disponíveis, consulte a área Observações |
|||
| 07 | lArvore |
Boolean |
Indica se, verdadeiro (.T.), apresenta o árvore do servidor; caso contrário, falso (.F.) |
|||
| 08 | lKeepCase |
Boolean |
Indica se, verdadeiro (.T.), mantém o case original; caso contrário, falso (.F.). |
Retorno
| Retorno | Tipo | Descrição |
| cRet | Caracter |
Retorna o nome do item. Caso nenhum item tenha sido selecionado, o retorna será uma string vazia |
Exemplo
#INCLUDE "TOTVS.CH" User Function cGetFile() Local cArq := '' cArq := cGetFile( '*.*' , 'Arquivos', 1, 'C:\', .F., nOR( GETF_LOCALHARD, GETF_LOCALFLOPPY, GETF_RETDIRECTORY ),.T., .T. ) If !Empty( cArq ) MsgInfo( cArq, 'UniversoADVPL' ) Endif Return( Nil )
Resultado
Informações adicionais
|
Se o cInitialDir apontar para um diretório oculto ou de sistema, lembre-se de habilitar as opções correspondentes |
|
* Os dois parâmetros só estão disponível em builds superiores a 7.00.131227A. |
|
Quando o parâmetro lArvore for verdadeiro (.T.) somente as pastas do rootpath do servidor serão acessíveis |
|
cMascara: Se não for informada uma máscara, o campo poderá ser editado pelo usuário a fim de especificar o filtro/máscara que desejar. Disponível apenas em builds superiores a 7.00.131227A |
NOPÇÕES
|
GETF_MULTISELECT (2) |
Compatibilidade |
|
GETF_NOCHANGEDIR (4) |
Não permite mudar o diretório inicial |
|
GETF_LOCALFLOPPY (8) |
Apresenta a unidade do disquete da máquina local |
|
GETF_LOCALHARD (16) |
Apresenta a unidade do disco local |
|
GETF_NETWORKDRIVE (32) |
Apresenta as unidades da rede (mapeamento). |
|
GETF_SHAREWARE (64) |
Não implementado |
|
GETF_RETDIRECTORY (128) |
Retorna/apresenta um diretório. |
|
GETF_HIDDENDIR (256)* |
Mostra arquivos e pastas ocultas |
|
GETF_SYSDIR (512)* |
Mostra arquivos e pastas do sistema. |
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎