Einzelnen Beitrag anzeigen

SebastianZ

Registriert seit: 23. Jul 2009
89 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Kein Zugriff auf den Google-Kalender

  Alt 30. Jun 2020, 10:04
Danke für Deine Antwort SebastianZ,
Du könntest aber evtl. die Unit nennen und die Zeile mit der Änderung kopieren und hier hosten?
Ich selber bin mir nicht sicher was und wo ich ändern soll.

MfG

Hier mal ein kleiner Ausschnitt. Im Prinzip musst du nur alle Verwendungenvon key= raussuchen und entfernen.

Delphi-Quellcode:
...
...
...
procedure ...GetCalendarInt(ID: string; FromDate, ToDate: TDate; ChangedSince: TDateTime; MaxResults: integer = 250);
var
...
begin
  url := APIBase + '/calendar/v3/calendars/' + URLEncode(ID) + '/events';

//------------------------------------------------
// Original mit Key:
// url := url + '?key=' + App.Key + '&singleEvents=True&orderBy=startTime&maxResults=' + IntToStr(MaxResults);
//------------------------------------------------

//Meine Korrektur:
  url := url + '?singleEvents=True&orderBy=startTime&maxResults=' + IntToStr(MaxResults);
...
...
...
  Mit Zitat antworten Zitat