Fórum Key Violation #217548
01/03/2004
0
a:=listbox1.Items.Count;
e:=0;
while e <= a do
begin
Query1.SQL.Clear;
query1.SQL.Add(´update vennota set equipamento=´+quotedstr(edit2.text));
query1.sql.add(´where nota=´+(LISTBOX1.Items.ValueFromIndex[e]));
query1.execsql;
label3.Caption:=´Atualizando nota ´+(LISTBOX1.Items.ValueFromIndex[e]);
e:=e+1;
end;
cursor:=crdefault;
E aí galera, o que está acontecendo?Dá sempre um alerta de erro dizendo Key Violation.O que posso fazer para contornar esta situação?
Vagner Monteiro
Curtir tópico
+ 0Posts
01/03/2004
Eduprp
Provavelmente vc esta estourando o número de itens do listbox.
Tente o seguinte
while e <= a - 1 do
....
....
Eduardo M. Pereira
Gostei + 0
02/03/2004
Buosinet
No aguardo
Buosi.
Gostei + 0
04/03/2004
Mariely Fernandes
pelo que estou vendo o nome do seu indice eh ´e´.
Verifique!
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)