oauth_oncreate.pas

procedure THeaderFooterwithNavigation.FormCreate(Sender: TObject);
var
  url: string;
begin
  { This defines the default active tab at runtime }
  TabControl1.First(TTabTransition.None);
  { TODO: Navigate to URL on load }
  url := 'https://www.fitbit.com/oauth2/authorize?response_type=code' +
        '&client_id=<YOUR_CLIENT_ID_GOES_HERE>' +
        '&redirect_uri=http%3A%2F%2Flocalhost' +
        '&scope=activity%20heartrate%20location%20nutrition%20profile%20settings%20sleep%20social%20weight%20oxygen_saturation%20respiratory_rate%20temperature' +
        '&expires_in=604800';
  TMSFNCWebBrowser1.Visible := true;
  TMSFNCWebBrowser1.Navigate(url);
end;