procedure TfrmHome.btnPhysics2Click(Sender: TObject);
begin
  frmHome.Show;
  frmPhysicsY2.Show;
end;

procedure TfrmHome.btnCreditsClick(Sender: TObject);
begin
  frmHome.Hide;
  frmAbout.Show;
end;

procedure TfrmHome.btnPhysicsClick(Sender: TObject);
begin
  frmHome.Hide;
  frmPhysicsY1.Show;
end;

procedure TfrmHome.btnExitClick(Sender: TObject);
begin
  Close
end;