Implementação - Classe TGrid

• A Classe TGrid esta retornando o número de linhas visíveis errado.
• Travamento temporário no TGrid.

O botões que movimentam o cursor do TGrid, não tem uma ligação direta com o componente, por isso a quantidade de linhas visíveis não eram atualizadas e com isso as informações ficavam inconsistentes.

• Para solucionar este problema, foi implementado um novo método chamado getVisibleRows que retorna o número de linhas visíveis no TGrid e também foi criada uma nova propriedade chamada bGridInfo, que dispara um evento para o método receptor sempre que a quantidade de linhas visíveis no componente TGrid é modificada, esta propriedade também foi criada para quando o componente TGrid estiver completo, ou seja com todos os dados já configurados, o evento bGridInfo retornará a quantidade de linhas visíveis no componente.
• Implementado o controle de recursividade de eventos no TGrid, o componente estava entrando em recursão e ficava temporariamente travado.
   

• Correção realizada referente aos chamados SDCVN7 e SDDDRV.
• Para mais informações de como utilizar a classe, consulte a documentação TGrid.

Exemplo de uso das novas funcionalidades:

      Propriedade:            	bGridInfo: { |o,nVisRows| (o, nVisRows) }      	o   -> Indica a instância do objeto Tgrid().         nVisRows -> Indica o número total de linhas visíveis na grade.      Exemplo de uso:            	:oGrid:bGridInfo := { |o,nVisRows| ::onGridInfo(o, nVisRows) }      Método: getVisibleRows():      Exemplo de uso:      	nVisibleRows := ::oGrid:getVisibleRows()