Guardar Registros

Question

Bom diaUso o DELPHI 5E tenho q fazer uma Proposta de Vendas que registre a proposta com os dados do Cliente e os Produtos.Estou tentan fazer que o pedido, os Itens de pedido seja feito num DBGRID, est...

Marcelo.c · Answer

Se entendi o que deseja, as tabelas devem possuir a mesma estrutura:

var Num: integer;
begin
     TabOrigem.Edit;
     TabDestino.Insert;
     for Num := 0 to TabOrigem.FieldCount - 1 do
     TabDestino.Fields[Num].Assign(TabOrigem.Fields[Num]);
     TabDestino.Post;
end;

Caso n�o tenham a mesma estrutura:

begin
  TabOrigem.Edit;
  TabDestino.Insert;
  TabDestinoCampo1.Value:=TabOrigemCampo1.Value;
  TabDestinoCampo2.Value:=TabOrigemCampo2.Value;
  ...
  TabDestino.Post;
end;

F�rum Guardar Registros #197106