Fórum listbox com vinculo #267936
09/02/2005
0
tenho um array de 40 listbox....para cada listbox carrego dados
de uma tabela, agora quero excluir um item do listbox
mas quero tb exclui-lo da tabela...!
tem como vincular o item do listbox com o registro que está lá...
nao da para excluir o item da tabela usando o conteudo que esta
no listbox....terei que vincular o codigo do registro ao item do listbox
tem como fazer isto?
trocando em miudos, vincular um codigo de registro ao item do listbox....sem
estar mostrando este codigo de registro...mostrando outra coisa
se usar dblistbox...nao fica ruim trabalhar com 40 datasource+querys...e etcs?
se tivesse como atribuir de alguma forma a cada item do listbox um codigo....eu ja fazia de tudo!
de uma tabela, agora quero excluir um item do listbox
mas quero tb exclui-lo da tabela...!
tem como vincular o item do listbox com o registro que está lá...
nao da para excluir o item da tabela usando o conteudo que esta
no listbox....terei que vincular o codigo do registro ao item do listbox
tem como fazer isto?
trocando em miudos, vincular um codigo de registro ao item do listbox....sem
estar mostrando este codigo de registro...mostrando outra coisa
se usar dblistbox...nao fica ruim trabalhar com 40 datasource+querys...e etcs?
se tivesse como atribuir de alguma forma a cada item do listbox um codigo....eu ja fazia de tudo!
Delphi_open
Curtir tópico
+ 0
Responder
Posts
09/02/2005
Beppe
Vc pode usar o método TListBox.Items.AddObject(´String´, Objeto);
Este objeto pode ser a chave primária do da tabela, ou se for um banco FB, pode usar RDB$DB_KEY.
Este objeto pode ser a chave primária do da tabela, ou se for um banco FB, pode usar RDB$DB_KEY.
Responder
Gostei + 0
09/02/2005
Delphi_open
cc:=1;
ll:=1;
listbox[cc][ll].Items.AddObject(´texto´,123);
listbox[cc][ll].Items.AddObject(´texto´,256);
imagine tenho um listbox com estes dados
123 -> ss
256 -> aa
se o cara pedir para excluir o itemindex=0 eu tenho que dar delete na tabela where codigo=123.
se o cara pedir para excluir o itemindex=1 eu tenho que dar delete na tabela where codigo=256.
e os dois codigos(123/256) nao podem aparecer no listbox...tem que estar vinculado ao item.....estou ainda com duvida...estou em aguardo
ll:=1;
listbox[cc][ll].Items.AddObject(´texto´,123);
listbox[cc][ll].Items.AddObject(´texto´,256);
imagine tenho um listbox com estes dados
123 -> ss
256 -> aa
se o cara pedir para excluir o itemindex=0 eu tenho que dar delete na tabela where codigo=123.
se o cara pedir para excluir o itemindex=1 eu tenho que dar delete na tabela where codigo=256.
e os dois codigos(123/256) nao podem aparecer no listbox...tem que estar vinculado ao item.....estou ainda com duvida...estou em aguardo
Responder
Gostei + 0
09/02/2005
Beppe
O que irá aparecer na listbox é o texto apenas.
Lb := listbox[cc][ll];
Para inserir:
Lb.Items.AddObject(´texto´,TObject(123));
Para deletar:
Cod := Integer(Lb.Objects[Lb]);
sqlDelete := ´DELETE FROM Tabela where Codigo = ´ + IntToStr(Cod);
PS: Você não deveria ter iniciado um novo tópico para isso. :evil:
Lb := listbox[cc][ll];
Para inserir:
Lb.Items.AddObject(´texto´,TObject(123));
Para deletar:
Cod := Integer(Lb.Objects[Lb]);
sqlDelete := ´DELETE FROM Tabela where Codigo = ´ + IntToStr(Cod);
PS: Você não deveria ter iniciado um novo tópico para isso. :evil:
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)