A sim ... É normal ele salvar os códigos fora de ordem com essa
função que vc passou, tipo:
1
4
3
--- Em delphi-br@yahoogrupos.com.br, "Alexsandro" <[EMAIL PROTECTED]> escreveu
>
> Blz Muito obrigado eu fiz assim, pois uso adotable :
>
> For i:= a to (b + c -1) do
> begin
> dm.ADOTExemplar.Insert;
> dm.ADOTExemplarCodExemplar.Value:=IntToStr(i);
>
> Agora como eu posso copiar os outros campos tambem, junto?
> Tipo preencho os dados : edição, nome do livro, e ele cria esses
> códigos que esta funfando filé, e copiando a primeira linha, junto
> com o código.
>
> Ex:
> 1 maria 5ºEdição
> 2 Maria 5ºEdição
> 3 Maria 5ºEdição
>
> Muito Grato pela atenção
>
>
> --- Em delphi-br@yahoogrupos.com.br, Luciano Calenzani Simões
> <simoesluciano@> escreveu
> >
> > ...
> > for i := InicioIntervalo to (InicioIntervalo + Quantidade - 1) do
> > begin
> > ...
> > Query.SQL.Text := 'insert ...';
> > ...
> > Query.ParamByName('codexemplar).AsInteger := i;
> > Query.ExecSQL;
> > ...
> > end;
> > ...
> >
> > Luciano Calenzani Simões
> >
> >
> >
> >
> >
> > ----- Mensagem original ----
> > De: Alexsandro <aq.s@>
> > Para: delphi-br@yahoogrupos.com.br
> > Enviadas: Segunda-feira, 16 de Junho de 2008 17:32:11
> > Assunto: [delphi-br] Adicionar vários registro num intervalo de
> números
> >
> >
> >
> > Boa tarde pessoal,
> > Como eu posso adicionar registros em uma tabela de acordo com o
> > intervalo que o usuário solicitar?
> > Ex: Sistema de biblioteca
> > Quando o usuário for incluir um exemplar, teria que informar
> quantos
> > exemplares e o intervalo:
> > Quantidade : 3
> > inicioIntervalo: 4 //no caso o intervalo fica 4,5,6
> > Resultado :
> > fkLivro codExemplar
> > 40 4
> > 40 5
> > 40 6
> >
> > porque se for incluir novos exemplares é só informar o intervalo
de
> > novo e a quantidade
> > quant:2
> > inicio de interva:7
> >
> >
> > Abra sua conta no Yahoo! Mail, o único sem limite de espaço
> para armazenamento!
> > http://br.mail.yahoo.com/
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
>
