1
0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-04-17 06:57:13 +02:00

37 lines
675 B
ObjectPascal
Raw Normal View History

program OAuth2Tester;
{$MODE Delphi}
{$I ..\..\..\source\cef.inc}
uses
{$IFDEF DELPHI16_UP}
WinApi.Windows,
Vcl.Forms,
{$ELSE}
Forms,
LCLIntf, LCLType, LMessages, Interfaces,
{$ENDIF }
uCEFApplication,
uCEFConstants,
uOAuth2TesterFrm in 'uOAuth2TesterFrm.pas' {OAuth2TesterFrm};
{.$R *.res}
{$R *.res}
begin
GlobalCEFApp := TCefApplication.Create;
GlobalCEFApp.SetCurrentDir := True;
if GlobalCEFApp.StartMainProcess then
begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TOAuth2TesterFrm, OAuth2TesterFrm);
Application.Run;
end;
DestroyGlobalCEFApp;
end.