Histórico da Página

User function tRgxNew()
  local regex := NIL
  
  regex := tRegex():new("([Z])\w+")
 
  if ValType(regex) <> "O"
    ConOut ("Erro, objeto nao foi criado")
  else
    ConOut ("Objeto criado com sucesso")
  endif

  regex := tRegex():new("([Z])\w+", .T. ) // Utiliza a biblioteca RE2
 
  if ValType(regex) <> "O"
    ConOut ("Erro, objeto nao foi criado")
  else
    ConOut ("Objeto criado com sucesso")
  endif
return