Verificar se a variável existe

[chokito]

Alguém sabe se tem como verificar se uma variável existe?
Desde já agradeço.

[Grings]

.

[rubens]

Tente:

If Valtype( Variavel ) != Nil
Variavel existe
Endif

[vagucs]

Eu vi esta rotina na sessão download, o amigo que fez, foi até inteligente, mas devem se lembrar que o clipper tem uma rotina chamada TYPE, que avalia uma string e te diz que tipo de expressão ela é.

Exemplo:

Código: Selecionar todos

? type("CHEQUE") // Retornar "U"
CHEQUE="OI"
? type("CHEQUE") // Retoanr "C"

Neste exemplo acima, como a variavel CHEQUE no primeiro type não existe ela retorna "U" ou seja UNDEFINED depois que ela recebe um valor, a função type avalia a expressão e vê que a expressão é do tipo caractere. Esta rotina serve exatamente para isto, veja agora um exemplo que verifica se uma funcao existe.

Código: Selecionar todos

? type("CHEQUE()") // Retoanr "UI"

function cheque(p)
? p
return nil

Veja que no caso de uma funcao, ele retorna "UI" se ela existir no executável, caso contrário ela retorna "U" para indefinida.

Muito mais simples e com rotinas do proprio clipper.

Código: Selecionar todos

function varexist(expressao)
if type(expressao)#"U"
   return .t.
else
   return .f.
end if

[gvc]

se a variável for igual a Nil, ela não existe.