This is my code:
procedure TmyNewDBComponent.SetDataSourceEdit(
const Value: TDataSource);
begin
//FDataLink.DataSource:=Value;
if not (FDataLink.DataSourceFixed and (csLoading in ComponentState))
then
FDataLink.DataSource := Value;
if Value <> nil then Value.FreeNotification(Self);
//at this point FDataLink.DataSource.DataSet=NIL !!!!!
end;