tabela.Open;
tabela.First;
while not tabela.Eof do
begin
iCont := iCont + 1;
if not tabela.Locate('campo',iCont,[loPartialKey]) then
memo1.Lines.Add(IntToStr(iCont));
tabela.Next;
end;
_____
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Cleiton - Yahoo
Enviada em: terça-feira, 25 de agosto de 2009 21:46
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] controlar seqüência..
Pessoal blz?
To batendo cabeça numa rotina aqui, e gostaria da ajuda de vocês.
Preciso verificar se numa seqüência de números qual valor esta faltando
exemplo
Tenho um numero de
1..10
Logo, 1,2,3,4,5,7,9,10
Quero saber como fazer pra saber quais números estão faltando ou seja os
números 6 e 8 na seqüência anterior.
Se alguém tiver alguma idéia ai por favor da um help aqui ok:??]]]
Abraço galera.
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
