Stringgrid in Tabbednotebook erstellen

[dataspider]

Hi,

wenn du das Form als Parent zuweist, so tut es das auch
Also, kurzes Beispiel:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Kartei   : TStringGrid;
  TabPage  : TWinControl;
  PageIndex: Integer;
begin
  PageIndex := tabbednotebook1.Pages.Add('TabText');
  TabPage   := TWinControl(tabbednotebook1.Pages.Objects[PageIndex]);
  kartei    := TStringgrid.Create(Self);
  // TabPage als Parent!
  kartei.Parent := TabPage;
  with kartei do
  begin
   left   := 100;
   top    := 100;
   width  := 800;
   height := 600;
  end;
end;

Cu, Frank