Hola Ledwin_v.
No está muy detallada la situación, pero como para darte alguna idea te pongo dos ejemplos.
Manualmente usando un
TButton:
Código Delphi
[-]
procedure TForm1.BotonGuardar(Sender: TObject);
begin
Table1.Post; Table2.Edit; Table2.FieldByName('OTROCAMPO').AsString:= Table1.FieldByName('CODIGO').AsString;
Table2.Post;
En forma automática usando el evento
AfterPost de la Tabla1:
Código Delphi
[-]
procedure TForm1.Table1AfterPost(DataSet: TDataSet);
begin
Table2.Edit;
Table2.FieldByName('OTROCAMPO').AsString:= Table1.FieldByName('CODIGO').AsString;
Table2.Post; end;
Pero claro todo depende de la lógica que emplees en tu aplicación...
Un saludo.