algo como ... ?
var
i:Integer;
begin
TabOrigem.Open;
TabOrigem.First;
whilt not TabOrigem.EOF do
begin
TabDestino.Insert;
for i:=TabOrigem.FieldCount-1 do
TabDestino.Fields[i].Value:=TabOrigem.Fields[i].Value;
TabOrigem.Next;
end;
end;
"Se não o Hospedeiro,
quem faz do parasita,
um parasita ?"
Vitor Luiz Redes
------------------------------------
Redsystem Informática
----- Original Message -----
From: info.suporte
To: [EMAIL PROTECTED]
Sent: Wednesday, October 20, 2004 11:55 AM
Subject: [delphi-br] Por favor me ajudem. Ajuda!!!!!!
Alguem sabe como eu faço para copiar dados filtrados de uma tabela para outra tabela
vazia?
Obs: As tabelas tem os mesmo campos.
Só para não precisar ficar copiando campo a campo, ou seja:
TAB.DESTINO.CODIGO:= TAB.ORIGEM.CODIGO;
TAB.DESTINO.NOME:= TAB.ORIGEM.NOME;
TAB.DESTINO.ENDER:= TAB.ORIGEM.ENDER;
TAB.DESTINO.CIDADE:= TAB.ORIGEM.CIDADE;
TAB.DESTINO.PAIS:= TAB.ORIGEM.PAIS;
etc, etc...
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
------------------------------------------------------------------------------
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
