Libera o bloqueio virtual de uma string.
Sintaxe
TCVUNLOCK ([ cPalavra ]) –> Lógico
| Argumento | Obrigat. | Tipo | Descrição |
| cPalavra | Não | C | String que deve ser liberada. Se não for passada, TODOS os locks virtuais desta conexão são liberados. |
Retorno | Descrição |
| .T. | A palavra foi bloqueada. |
.F. | Não foi possível desbloquear a palavra, provavelmente porque ela não estava bloqueada. |
Descrição
Retira o bloqueio virtual de uma string ou de todas da conexão.
Exemplo
#ifdef TOP
If TCIsVLock()
if !TCVLock(“Processo1”)
messagebox(“Nao foi possivel bloquear o processo1”, “”, 0)
return
endif
…… // Processa
TCVUnlock(“Processo1”)
EndIf
#endif