CEF4Delphi/demos/Lazarus_Linux_GTK2/OSRExternalPumpBrowser2/OSRExternalPumpBrowser2.lpr

program OSRExternalPumpBrowser2;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  // "Interfaces" is a custom unit used to initialize the LCL WidgetSet
  // We keep the same name to avoid a Lazarus warning.
  Interfaces, // this includes the LCL widgetset
  Forms, lazopenglcontext, uOSRExternalPumpBrowser2,
  { you can add units after this }
  uCEFApplication, uCEFWorkScheduler;

{$R *.res}

begin
  CreateGlobalCEFApp;

  // The LCL Widgetset must be initialized after the CEF initialization and
  // only in the browser process.
  CustomWidgetSetInitialization;
  RequireDerivedFormResource:=True;
  Application.Scaled:=True;
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;

  // The form needs to be destroyed *BEFORE* stopping the scheduler.
  Form1.Free;

  GlobalCEFWorkScheduler.StopScheduler;
  CustomWidgetSetFinalization;

  DestroyGlobalCEFApp;        
  DestroyGlobalCEFWorkScheduler;
end.