type MyComponent1=class(TComponent)
  public
    FDateSets:TList;
    function GetDataSet(Index:integer):TDataset;
  public
    DataSets[Index:integer]:TDataSet read GetDateSet;  
end;procedure mycompoent.create;
begin
  datesets:=TList.Create;
end;    
procedure mycomponent.addDataset(DataSet:TDataSet);
begin
  dataSets.Add(DataSet);
end;
function mycomponent.GetDateSet(index:integer):TDataSet;
var i:integer;
begin
  if Index>0 or Index<FDataSets.Count then
    Result:=TDataSet(FDataSets.Items[i]);
end;