BlackTDN :: 🚀 **Depurando Blocos de Código (xBase)** 🚀
🚀 **Depurando Blocos de Código (xBase)** 🚀 Interessante a abordagem de **Blocos de Código** no **Harbour**! Eles funcionam literalmente como "cidadãos de primeira classe", permitindo até mesmo depuração passo a passo. 🔍 **Exemplo Prático:** ```xBase Eval( {|aFunTst as array| LOCAL lValid AS LOGICAL LOCAL i AS NUMERIC FOR i := 1 TO Len(aFunTst) // Verifica resultado esperado lValid := aFunTst[i][3] IF lValid SetColor("g+/n") QOut("(" + aFunTst[i][2] + "): passed") SetColor("") ELSE SetColor("r+/n") QOut("(" + aFunTst[i][2] + "): failed") SetColor("") ENDIF NEXT i RETURN NIL }, aFunTst ) ``` 🤔 **Pergunta aos escovadores de bit de plantão:** É pos...
É possível obter os métodos de MsNewGetDados com essa função? Não consegui encontrar essa e nem outras funções de frame.
ResponderExcluirBom dia, gostaria de Deixa meu Agradecimento ao autor, pois a documentação do TDN ainda é muito mal documentada em relação a classe, um exmplo é sobre a MsNewGetDados que até hoje não tem as propriedades da classe na documentação.
ResponderExcluirTentei executar isso:
ResponderExcluirLocal aClassesArray := __ClsArray()
Mas deu mensagem de erro:
Opção não disponivel no Protheus
Função: __CLSARRAY Called By ........ etc.
Boa tarde.
ResponderExcluirGostaria de saber se alguém possui qualquer um dos fontes abaixo.
CFGR510 e ou CFGA510.
Quem tiver e puder me mandar ficaria muito agradecido e ate mesmo uma recompensa poderei dar.
Mas desde já agradeço.
Olá amigo, conseguiu o fonte do cfgr510 ?
Excluir