RestDemo - Verbindung zu Google funktioniert nicht mehr
Hallo,
wenn ich mit dem RestDemo (..\RADStudio10.4Demos\Object Pascal\Database\RESTDemo) versuche ein Verbindung zu Google herzustellen, dann kann ich den Dialog nicht sauber ausführen (Wichtiger Button 'zulassen' ist ausgegraut....) Das interne Auth-Formular verwendet hier meines Wissens den IE, denn bei Direktaufruf über den IE erhalte ich einen Scriptfehler. Dieses würde das problem zumindest erklären. Das interne Auth-Formular Tfrm_OAuthWebForm löst nach einem erfolgreichen Redirekt die benötigten Informationen aus der Url und übergibt diese an das Programm. Folgender Code führt dieses durch:
Code:
Meine Frage ist nun, ob man diesen Prozess auch mit dem Aufruf des Standard-Browsers (z.B. FF) durchführen kann?
procedure TForm1.OAuth2_GoogleTasks_BrowserTitleChanged(const ATitle: string;
var DoCloseWebView: boolean); begin if (StartsText('Success code', ATitle)) then begin edt_GoogleTasks_AuthCode.Text := Copy(ATitle, 14, Length(ATitle)); if (edt_GoogleTasks_AuthCode.Text <> '') then DoCloseWebView := TRUE; end; end; Da habe ich dann jedoch keine Idee, wie man hier an die Url kommt, um die Parameter dort auszulesen, da der Aufruf ja nicht über TWebBrowser gekapselt ist. Gibt es ggf. eine Möglichkeit dieses z.B. mit der TEdgeBrowser-Komponente umzusetzen oder eine andere Möglichkeit, um den Auth-Dialog damit durchzuführen? OS: Win10 Delphi-Version ist: 10.4E |
AW: RestDemo - Verbindung zu Google funktioniert nicht mehr
Ist die INI Datei mit den Einstellungen vorhanden? (diese wird in procedure Tfrm_Main.LoadConnectionData benötigt)
Ich nehme an es ist dieses Demo: https://github.com/Embarcadero/RADSt.../master/Object Pascal/Database/RESTDemo |
AW: RestDemo - Verbindung zu Google funktioniert nicht mehr
Ja, dieses Demo ist es:
https://github.com/Embarcadero/RADSt...abase/RESTDemo Die ini ist bei der Exe dabei und hat auch die richtigen Werte. |
AW: RestDemo - Verbindung zu Google funktioniert nicht mehr
Hallo,
das gleiche Problem habe ich gerade auch mit einer alten TMS-Komponente. Die haben das jetzt umgebaut, es wird der Standardbrowser benutzt. Die umgebaute/neue Komponente habe ich gekauft ... Das war mir sonst zu aufwendig. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:26 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz