TOTVSTEC

Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 6 Próxima »

Retorna um array com os resources do repositório baseado na pesquisa por nome ou máscara.

Sintaxe

GetResArray( < cMask > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cMask

caractere

Indica o nome do resource ou máscara que será usada na pesquisa. Serão aceitos caracteres curingas '*' e '?'.

X

 

Retorno

Nome

Tipo

Descrição

aRet

vetor

Resources do repositório

Observações

  • Resources retornados com nome em caixa alta.
  • Função disponível a partir da build 7.00.080806P.

Exemplos

user function Exemplo ()
  Local aFontes := nil
  Local tFontes := 0
  Local nI := 0

  // Teste 1 - Retorna todos arquivos com extensão .png
  aFontes := GetResArray("*.png")
  tFontes = len(aFontes)
  if tFontes > 0
    for nI := 1 to tFontes
      conout("Fonte ["+aFontes[nI]+"] encontrado!")
    next
    MsgInfo("Fontes encontrados. Verifique no console.","Resultado")
  else
    MsgInfo("Nenhum fonte encontrado.","Resultado")
  endif
  
  // Teste 2 - Retorna todos arquivos com extensão formada por 3 letras onde a terceira é "g".
  // Ex: png e jpg
  aFontes := GetResArray("*.??g")
  tFontes = len(aFontes)
  if tFontes > 0
    for nI := 1 to tFontes
      conout("Fonte ["+aFontes[nI]+"] encontrado!")
    next
    MsgInfo("Fontes encontrados. Verifique no console.","Resultado")
  else
    MsgInfo("Nenhum fonte encontrado.","Resultado")
  endif
Return

Abrangência

Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

Veja também

  • Sem rótulos