Crear un DbGrid en una TTabSheet

[GerTorresM]

Estoy intentando crear un DBGrid dentro una pestaña de un PageControl, para lo cual estoy empleando el siguiente código

Código Delphi [-]
 
PCInformacion:= TPageControl.Create(Self);
with PCInformacion do
begin
  Parent:= Form1; 
  Align:= AlClient;
end;
Hoja1:=TTabSheet.Create(PCInformacion);
with Hoja1 do
begin
  PageControl:= PCInformacion;
  Caption:= 'Hola Mundo';
  DTPFecha:= TDateTimePicker.Create(Self); 
  DBGDatos:= TDBGrid.Create(Self);
  DataSource:= TDataSource.Create(Self);
  DTPFecha.Parent:= Hoja1;
  DBGDatos.Parent:= Pagecontrol.Activepage;
end;

pero al intentar correr la apliación me envía el siguiente mensaje

Incompatibles types TWidgetControl And TTabSheet, al comentariar la línea donde fijo de parent del DBGrid, corre, pero no me dibuja el compnente, no se como puede remediar el error o cual sintaxis a emplear