Para mim sempre foi muito penoso trabalhar com o ListView no NetExpress. Devem existir pelo menos 20 pastas com exemplos diferentes no meu PC, e todos ajudaram muito, cada um com aquela função que se propôs a ensinar. Porém, é difícil achar um exemplo que mostre de forma simples, todos os passos para utilização desse componente ( criar, inserir, alterar, excluir e assim por diante ).
Pensando nisso, resolvi criar uma aplicação demo simples, com a proposta de ensinar o caminho das pedras, para aqueles que estão iniciando a utilização, de uma maneira prática.
Estou disponibilizando hoje a primeira versão dessa aplicação e espero que os todos possam contribuir ao longo do tempo, para que sejam adicionadas novas funções, e assim teremos um guia de referência prático para utilização do tão temido ListView.
Algumas funções que estão nessa primeira versão:
1. Criação de 2 ListView’s na mesma tela utilizando apenas 1 controlador.
2. Adicionando colunas.
3. Criando novas linhas.
4. Pegando a linha selecionada.
5. Pegando a linha selecionada com duplo clique.
6. Adicionando check-boxes.
7. Pegando as informações de quais check-boxes foram selecionadas.
Esse demo foi criado utilizando o programa controlador único, que eu já havia disponibilizado no site do ClubeCobol, semana passada. Os demais objetos utilizados, são os objetos padrão do NetExpress ( ListView e ListViewItem ). Ou seja, qualquer um com NetExpress vai poder rodar a aplicação.
Ainda existem muitos métodos que podem ser adicionados, e se tudo der certo, ainda teremos as partes 2, 3, 4 5 desse artigo, publicando novas funções ao projeto.
Para fazer o download da aplicação, clique aqui.
#1 by Pita at August 24th, 2009
Não consegui fazer a demonstração funcionar dá um erro 203 no Create-Entry-Point - lvctrl.cbl!
#2 by LeX at August 24th, 2009
Pita,
Experimente abrir os arquivos CBL por fora do projeto e compilar. O lvctrl.cbl e o ecmpais.cbl.
Aqui está funcionando certinho e compactei a pasta inteira do projeto nesse arquivo, então não deveria dar nada errado.
Na intalação do NetExpress, você optou por instalar as classes dele também ?
Abraço.
#3 by Pita at August 24th, 2009
Compilado fora do projeto funciona, valeu.
#4 by Antonio João at January 2nd, 2010
Não é um problema de compilação.
O problema é que o lvctrl é o primeiro a ser executado.
Vá no menu Animate\Settings e mude em “Start animating at”
%TARGETDIR\lvctrl
por
%TARGETDIR\ecmpais
Be happy.
#5 by Valter Aniceto at January 22nd, 2010
bom dia.
sou desenvolvedor de sistema e tambem utilizo o net express 3.1, gostaria de saber se vc sabe como fazer a linha de hint (tooltip) em varias linhas, ou em formato de balão.
se puder me ajudar, desde já menu muito obrigado.
sem mais.
#6 by LeX at January 22nd, 2010
Olá Valter,
Não sei se é possível criar HINT’s para cada alinha do listview, fiz um teste aqui e apresentou erro. De qualquer forma esse é o código para criar os HINT’s via OO. Talvez ajude.
invoke Tooltip “new” using f-List returning umTooltip
invoke umTooltip “create”
invoke Characterarray “withValue” using z”Teste”
returning umCharacterarray
invoke umTooltip “addGadget” using f-List umCharacterarray
invoke umCharacterarray “finalize” returning umCharacterarray
E declare as classes:
Tooltip is class “tooltip”
CharacterArray is class “chararry”
Abraço.