BatchMove como funciona??

[marcoszorrilla]

Pues bastante sencillo, tienes 2 propiedades:
Destination
Source

Como su nombre indica enganchas una tabla a Source y otra a Destination, naturalmente tiene que tener la misma estructura y luego lo lanzas medainte código.

Código Delphi [-]
 procedure TfrWord.SpTraspasoClick(Sender: TObject);
 begin
 panel1.visible:=True;
 animate1.active:=True;
 animate2.active:=True;
 animate3.active:=True;
 animate4.active:=True;
 
 cliw.Open;
 cliW.EmptyTable;
 cliw.Close;
 batchmove1.Execute;
 
 ProW.Open;
 ProW.EmptyTable;
 ProW.Close;
 batchmove2.Execute;
 animate1.active:=False;
 animate2.active:=False;
 animate3.active:=False;
 animate4.active:=False;
 panel1.visible:=False;
 end;

Un Saludo.