FIELDWBLOCK() Retorna um bloco de código get-set para um campo numa determinada área de trabalho ------------------------------------------------------------------------------ Sintaxe FIELDWBLOCK(<cNomeCampo>, <nAreaTrab>) --> bFieldWBlock Argumentos <nNomeCampo> é o nome do campo ao qual o bloco set-get irá se referir como um string. <nAreaTrab> é o número da área de trabalho onde o campo reside, especificado na forma de valor numérico. Retorno FIELDWBLOCK() retorna um bloco de código o qual quando avaliado estabelece (set) ou recupera (get) o valor de <cNomeCampo> na área de trabalho designada por <nAreaTrab>. Se <cNomeCampo> nao existir na área especificada, FIELDWBLOCK() retorna NIL. Descriçao FIELDWBLOCK() é uma funçao que constroi um bloco de código. Quando avaliado com EVAL(), o bloco de código primeiro seleciona a área designada por <nAreaTrab>. Se um argumento for passado, o bloco de código coloca este valor em <cNomeCampo>. Se nao for passado argumento algum, o bloco de código recupera o valor de <cNomeCampo>. A área de trabalho original é re-selecionada antes do bloco de código devolver o controle. Notas ■ FIELDWBLOCK() é similar a FIELDBLOCK(), a diferença é que FIELDBLOCK() nao incorpora a área de trabalho dentro do bloco. Exemplos ■ O exemplo a seguir compara FIELDWBLOCK() ao bloco de código criado usando o macro operador. Note que usando FIELDWBLOCK() permite a você evitar o dispêndio de tempo e memória do operador macro: // Bloco Set-Get para área 1 definido com macro bSetGet := &( "{ |setVal| IF( setVal == NIL, ; 1->FName, 1->FName := setVal ) }" ) // Bloco Set-Get definido com FIELDWBLOCK() // bSetGet aqui criado é equivalente funcional de bSetGet acima bSetGet := FIELDWBLOCK("FName", 1) ■ Outro exemplo de FIELDWBLOCK() pode ser encontrado em TbDemo.prg, um programa demo incluso com o Clipper 5.0. O objeto TBColumn, um dos que representa cada coluna do objeto TBrowse, requer entre suas variáveis particulares um bloco para recuperar a expressao a ser exibida. FIELDWBLOCK() é usada para criar este bloco. Na instalaçao padrao, TbDemo.prg está localizado no diretório \CLIPPER5\SOURCE. Arquivos: Biblioteca CLIPPER.LIB. To download this example - click here.
See Also: FIELDBLOCK() MEMVARBLOCK()