请教一个问题：如何将一个组件输出为一个DataSource或DataSet？

Question

就是想让某组件输出一个DataSource，让DBGrid能够获取数据源。
具体的组件声明如下（未完成）：
type
  TFindCompent = class(TGroupBox)
  FindMode:TCombobox;
  FindModeLable:Tlabel;  FindString:TEdit;
  FindStringLabel:Tlabel;  private
  FDataSet: TADODataSet;
  FDataSource:TDataSource;  FTableName:string;
  FConnectionString:string;
  FPlaceMode:integer;
  
  FindModeLeft, FindModeTop, FindModeWidth, FindModeHeight:integer;
  FindStringLeft, FindStringTop, FindStringWidth, FindStringHeight:integer;
  procedure SetDataSet(ADataSet: TADODataSet);
  procedure SetTableName(TableName:string);
  Procedure SetConnectionString(ConnectionString:String);
  procedure InitFindMode();
   { Private declarations }
  protected
  Margin:integer;
  SubMinWidth:integer;
  MinWidth:integer;  procedure Resize; override;
  procedure Repositioning;
  procedure Paint; override;
  procedure SetPlaceMode(PlaceMode:integer);   //设置控件放置模式
    { Protected declarations }
  public
  constructor Create(AOwner: TComponent); override;
  destructor Destroy; override;
    { Public declarations }
  published
  property TableName:string read FTableName write SetTablename;
  property Connectionstring:string read FConnectionString write SetConnectionString;
  property PlaceMode:integer read FPlaceMode write SetPlaceMode;
  property DataSet: TADODataSet read FDataSet write SetDataSet;  { Published declarations }
  end;