Código Delphi
[-]
procedure TForm2.Button1Click(Sender: TObject);
begin
DbEdit1.DataSource:=Form1.DataSource1;
DbEdit1.DataField:='Addr1';
end;
Mira a ver esta línea me parece que no es correcta:
frmCogerLibro.eLibro.DataSource := frmPrincipal.frmLibros1.dsLibros;
Si el Dataset esta en frmPrincipal, sobraría la alusión a libros.
Un Saludo.