Gravar em uma outra tabela
Como usar o TTable e o TQuery associados??????
Tenho uma tabela em paradox,
na minha aplicação ela é Table1,
Uso uma Query para fazer uma seleção:
select *
from tabela
where nivel = ´ A ´
Até aí tudo bem, mais com eu faço para pegar o resultado dessa query e gravar em uma outra tabela somente esse conteúdo ????????
Por favor, se puder, me dê um exemplo pass-a-passo...
Tenho uma tabela em paradox,
na minha aplicação ela é Table1,
Uso uma Query para fazer uma seleção:
select *
from tabela
where nivel = ´ A ´
Até aí tudo bem, mais com eu faço para pegar o resultado dessa query e gravar em uma outra tabela somente esse conteúdo ????????
Por favor, se puder, me dê um exemplo pass-a-passo...
Lbsystems
Curtidas 0
Respostas
Skaarj
15/05/2003
Consequentemente após isso a Query1 possui todos os dados com NIVEL = A da Table1.. E seja a Table2 que irá receber os dados da Query1..
Por não saber o nome dos campos envolvidos, vou usar campos para exemplo apenas..
Manda a Query1 pro seu inicio [como fosse uma tabela]. Enquanto ela não chegar ao seu fim [EOF] insira na Table2 os dados contidos na Query1, ao inserir, passe para o proximo registro da Query1..
:)
Por não saber o nome dos campos envolvidos, vou usar campos para exemplo apenas..
Query1.first;
while not Query1.eof do
begin
table2.insert;
table2Nome.asstring:=Query1.fieldbyname(´NOME´).asstring;
table2Nivel.asstring:=Query1.fieldbyname(´NIVEL´).asstring;
table2Data.asdate:=Query1.fieldbyname(´DATA´).asdate;
table2.post;
query1.next;
end;
Manda a Query1 pro seu inicio [como fosse uma tabela]. Enquanto ela não chegar ao seu fim [EOF] insira na Table2 os dados contidos na Query1, ao inserir, passe para o proximo registro da Query1..
:)
GOSTEI 0