Pular para o conteúdo principal

Postagem em destaque

BlackTDN :: AdvPL/TLPP Estudando xBase: A Linguagem "Pátria

_Créditos da imagem: Gerada com auxílio do ChatGPT/Gemini_ **Domine AdvPL/TLPP Estudando xBase: A Linguagem "Pátria"** Você quer ser um programador proficiente em **AdvPL/TLPP**? Está em busca de cursos online, suporte via Skype ou Facebook? Que tal uma abordagem que realmente faça você **dominar** essas linguagens entendendo suas bases? Eu domino o AdvPL/TLPP porque **não estudo diretamente essa linguagen**. O segredo? Eu estudo **xBase**, a "linguagem pátria" que deu origem ao AdvPL/TLPP. Ao compreender a xBase, você adquire uma base sólida para dominar suas variações e derivados. E qual é a melhor e maior fonte de conhecimento xBase hoje? Sem dúvidas, é o projeto **(x)Harbour**. Este compilador e repositório oferece uma vasta coleção de exemplos e ferramentas que não só aprimoram suas habilidades, mas também ampliam sua compreensão do funcionamento interno da linguagem. Algumas sugestões práticas para iniciar sua jornada: - **Explore os exemplos no projet

Protheus :: Programação Básica em Advpl “Combo XXXI”

Blocos de Codificação:

Os Blocos de Codificação ou CodeBlock são variáveis que utilizamos para armazenar fragmentos de codificação do programa. Esses fragmentos podem ser passados para funções que irão executá-los.

Criamos um bloco de codificação à partir da seguinte sintaxe:

bVar := { || Teste() }

O caractere { significa “inicio do bloco de codificação” e o caractere “}”, “fim do bloco de codificação”. As duas barras verticais ( || ) delimitam a lista de parâmetros formais do bloco de codificação.

A variável bVar pode ser Local, Static, Private ou Public; não faz diferença. Ela só contém um fragmento de codificação e quando avaliado ele chama a função Test()

Para avaliar – ou executar – um bloco de código, use a função Eval(), como em: nResult := Eval( bVar ) esta chama a função Test(). Como toda função Eval() retorna um resultado ( que é o último elemento do bloco de código )

Ex.:

bRetVal := {|nVar1,nVar2,nVar3|nVar2:=nVar1+nVar2, nVar2*nVar3}
nResult := Eval( bRetVal , 1 , 2 , 3 )

//Após avaliar o bloco, Eval retornará para nResult 9 que é o resultado //da operação definida no bloco de código.

Comentários

Postagens mais visitadas