LaunchBrowser Event
Fires before launching a browser with the authorization URL.
Syntax
type TLaunchBrowserEvent = procedure LaunchBrowser(Sender: TObject;var URL: String;var Command: String) of object;
property OnLaunchBrowser: TLaunchBrowserEvent read FOnLaunchBrowser write FOnLaunchBrowser;
Remarks
When the ClientProfile property is set to cfApplication and GetAuthorization is called the component will fire this event with the Command which will be executed by the component. The URL parameter will be the authorization URL which the user will be directed to authenticate.
Within this event you may override the current value of either Command or URL and provide your own value. If Command is set to empty string the component will not attempt to launch the browser and instead you will be responsible for directing the user to the authorization URL specified by AuthorizationURL.
In Windows, ShellExecute is used to execute Command, which limits the verbs available for use in Command to:
- edit
- explore
- find
- open