PageControl и Button

[kuzmich]

привет всем!
в общем я использую два компонента pagecontrol и button. в pagecontrol у меня создано две вкладке toolbar1 и toolbar2. хочу сделать так - когда у меня открыто toolbar1 при ножатии на кнопку, чтобы открывалась форма 2, а при выборе toolbar2 открывалась форма 3. ну с помощью одной кнопки. подскажите как это сделать

[Shouldercannon]

procedure TForm1.Button1Click(Sender: TObject);
begin
  if PageControl1.ActivePageIndex = 0 then Form2.Show;
  if PageControl1.ActivePageIndex = 1 then Form3.Show;
end;