AJUDA PARA DELETAR ITEM

SACOFRITO 15/11/2010 10:30:48
#357467
Bom dia galera,
Estou fazendo meu primeiro controle de saidas de mercadorias, e meu cliente trabalha com doações.. Enfim essa parte posso pular.
Mas estou meio confuso no jeito mais fácil de deletar item da lista de produtos que ja foram adicionados. No caso um ListBox.
Pensei em fazer um campo item na tabela de detSaidas, mas acho que na hora de preencher de novo vai ficar ruim.

Alguém pode me dar uma luz nisso, por favor?
Pensei em usar o tal do index, mas ainda nao sei trabalhar com ele, apenas sei algo sobre a definição da função dele.


Obrigado galera,
Abraços,

Sacofrito
ZENORATO 15/11/2010 11:01:27
#357471
Resposta escolhida
Oi, Não entendi bem seu problema.

Vc quer apenas deletar um produto de um ListBox ou quer fazer também a exclusão do item no banco de dados ?

Se for apenas a remoção do ListBox basta fazer:

NomeDaLista.RemoveItem (NomeDaLista.ListIndex)

O Valor .ListIndex indica que vc vai excluir o item que tá selecionado na lista!
SACOFRITO 15/11/2010 11:17:37
#357472
é no banco de dados sim.
Pois estou fazendo da seguinte maneira, adiciono os itens na tabela detOrcamento e entao a cada adição irá limpar e preencher a lista novamente conforme os registros do CodOrc correspondente a uma variavel da tabela mae - Orcamento.

Mas e ai quanto eu tiver que deletar um item, estou com duvida para fazer isso, pois apenas deletar seria facil. Eu iria colocando o numero do item na tabela e no list tb, ai para deletar seria só informar o numero do item e [Ô]pimba[Ô]. Mas ai para preenchernovamente a listbox, ficaria faltando um item, entendeu mais ou menos?


Exemplo
Item CodPRod Descricao
--------------------------------------------------
00001 02 Blbllblbbalbal
00002 05 lalalalallalalal
00003 10 sahushausha


Ai eu deleto o numero 2
Na hora de preencher de novo ficaria assim

Item CodPRod Descricao
--------------------------------------------------
00001 02 baaabalbalbalab
00003 10 hsahsaushuah

Pode ser q uma função de ordenação resolva. Se sim, alguem pode me ajudar com isso ?
Seria apenas fazer um loop e editar o campo item em forma crescente?



ZENORATO 15/11/2010 12:11:21
#357474
Se entendi bem o problema na verdade é para reordenar o campo [Ô]item[Ô], se dor isso mesmo vc pode utilizar um código parecido com esse abaixo para atualizar esse campo.

Esse código abaixo tem que ser criado depois que vc fizer a exclusão:

PS: tem que passar a cóncição 'xom o código do orçamento ...


Select Item, CodPRod, Descricao From detOrcamento Where ??? Order By Item

Set TabDetalhe ....

ContItem = 1

If not TabDetalhe.eof then
While not TabDetalhe.eof
TabDetalhe! Item = ContItem
ContItem = ContItem +1
TabDetalhe.movenext
Wend
SACOFRITO 15/11/2010 12:24:16
#357476
Bom, eu pensei exatamente isso.
Mas achei que teria um jeito menos trabalhoso de fazer.

Ainda nao cheguei nessa parte. Mas quanto chegar vou fazer isso mesmo.

Obrigado cara, precisava msm é de alguem a mais abrindo a mente :)

Abraço !
Tópico encerrado , respostas não são mais permitidas