这段代码错在哪里，郁闷呀？

Question

procedure TForm1.FormCreate(Sender: TObject);
var
i: Integer;
begin
  for i := 0 to 9 do
    with TTabSheet.Create(Self) do
     begin
      PageControl := PageControl1;
      Caption := 'TabSheet' + IntToStr(i);      with TEdit.Create(Self) do
         begin
          parent:=pagecontrol1.pages[i]
          left:= Random(PageControl1.ActivePage.ClientWidth - Width);
          Top := Random(PageControl1.ActivePage.ClientHeight - Height);
          end;
       end;
  end;

Answer 1

uses 里面保证有
ComCtrls, StdCtrls
……
with TEdit.Create(Self) do
    begin
          parent:=pagecontrol1.pages[i];//这里漏写分号
          left:= Random(PageControl1.ActivePage.ClientWidth - Width);
          Top := Random(PageControl1.ActivePage.ClientHeight - Height);
     end;
end;
……