Браузер со вкладками

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "SHDocVw_OCX"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SpeedButton3Click(TObject *Sender)
{
CppWebBrowser1->GoBack();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SpeedButton2Click(TObject *Sender)
{
CppWebBrowser1->GoForward();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SpeedButton5Click(TObject *Sender)
{
CppWebBrowser1->Stop();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SpeedButton4Click(TObject *Sender)
{
CppWebBrowser1->Refresh();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SpeedButton6Click(TObject *Sender)
{
CppWebBrowser1->GoHome();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::SpeedButton1Click(TObject *Sender)
{
CppWebBrowser1->Navigate (StringToOleStr(ComboBox1->Text));
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
 
{
Form1: TCppWebBrowser* newbrowser;
void __fastcall make_tab();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormCreate(TObject *Sender)
{
make_tab();
Form1: PageControl1->Align = alClient;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::CppWebBrowser1BeforeNavigate2(TObject *Sender, LPDISPATCH pDisp,
          Variant *URL, Variant *Flags, Variant *TargetFrameName, Variant *PostData,
          Variant *Headers, VARIANT_BOOL *Cancel)
{
CppWebBrowser: ComboBox1->Text = CppWebBrowser1->LocationURL;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormResize(TObject *Sender)
{
Form1->ComboBox1->Width = Form1->Width - 150;
}
//---------------------------------------------------------------------------

[BCC32 Error] Unit1.cpp(60): E2379 Statement missing ;
[BCC32 Error] Unit1.cpp(64): E2089 Identifier 'FormCreate' cannot have a type qualifier
[BCC32 Error] Unit1.cpp(85): E2139 Declaration missing ;
[BCC32 Error] Unit1.cpp(85): E2134 Compound statement missing }

void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift)
{
/* Form1: это здесь зачем ? */ TCppWebBrowser* newbrowser;
/* и это здесь зачем ?
может, прототип лучше в заголовочный файл ?
вне класса формы, коль он у вас не член оной формы ?*/
void __fastcall make_tab(); 
// ошибки, может, и исчезнут,
// но смысла в этом всем я как-то не улавливаю. 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
make_tab(); // где сама функция ?
/* Form1: это мы уже проходили... */ PageControl1->Align = alClient;
/* коль очень уж не терпится, можно попытаться так */
// Form1->PageControl1->Align = alClient;
}