Hola...
La forma correcta sería:
Código:
procedure TfPrincipal.BvnuevaClick(Sender: TObject);
begin
fmodulo.tVenta.Active := true;
fmodulo.tVenta.Insert;
fmodulo.tVentadetalle.Active :=true;
fventa :=tfVenta.Create(self);
fventa.Parent := Dp1;
fventa.Align := alClient; // Si no lo haz hecho...
fVenta.ManualDock(dp1); // Si Dp1 es un TPanel, esto no es necesario...
fventa.Show
end;
Saludos...