Função: DirDialog

Descrição

Esta função disponibiliza uma interface para seleção de um diretório.

Sintaxe da função :

bool flag_selected, string dir_selected DirDialog(
                 string title,
                 string initial_dir)

Parâmetros de entrada

Notificação de Informação
title	Titulo para a janela de solicitação de seleção de arquivo Exemplo : “Selecione diretorio de receitas”
initial_dir	Diretório raiz a ser utilizado como base para a seleção do diretório. Neste caso, se o usuário especificar algum diretório raiz, permite-se selecionar somente diretórios abaixo deste diretório raiz. Se o usuário desejar selecionar qualquer diretório, inclusive na rede corporativa, deve-se passar este parâmetro como string nula (“”). O caracter de divisão de pastas deve ser “\”. Exemplo : “C:\Dados\Configuração”

Parâmetros de saida

String resultante com o caminho completo do arquivo selecionado pelo usuário. Se o usuário cancelar a seleção do arquivo, a função retorna uma string nula.

Notificação de Informação
flag_selected	Flag de seleção onde retorna 1 (“true”) se diretório foi selecionado com sucesso, caso contrário, retorna 0 (“false”), por exemplo quando o usuário cancelou a seleção do diretório. O diretório s elecionado será retornado na variável “dir_selected”. O valor “true” pode ser considerado um valor numérico diferente de zero, e o valor “false” pode ser considerado um valor numérico igual a zero.
dir_selected	String resultante com o caminho completo do diretório selecionado pelo usuário. Se o usuário cancelar a seleção do arquivo, a função retorna uma string nula

Exemplo de utilização

Exemplo de utilização para selecionar um diretório:

fig. Exemplo de Interface para selecionar um diretório

-- --------------------------------------------------------------------
-- Exemplo 1: DirDialog para selecionar um diretório qualquer
-- --------------------------------------------------------------------
function exemplo1()
  -- solicita seleção de qualquer diretorio
  local  flag_selected, dir_path = DirDialog("Selecione diretório de trabalho", "")
  return flag_selected, dir_path
end

-- --------------------------------------------------------------------
-- Exemplo 2: DirDialog para selecionar um diretório abaixo de "C:\\Dados""
-- --------------------------------------------------------------------
function exemplo2()
  -- solicita seleção de diretorio a partir da pasta "C:\\Dados"
  local  flag, directory = DirDialog("Selecione pasta de receitas", "C:\\Dados")
  return flag, directory
end


-- --------------------------------------------------------------------
-- Programa Principal
-- --------------------------------------------------------------------
 -- executa exemplo
 local msg
 selected, directory = exemplo1()
 if (selected ~= 0) then
   msg = "Diretório selecionado : " .. directory
 else
   msg = "Seleção de diretório cancelada ..."
 end
 print (msg)