Reference TApplication

  TApplication = class(TSceneHost)
  protected
    procedure SetVSync(Value: Boolean); override;
  public
    { Do not create an application. Use the global Application function. }
    constructor Create(AOwner: TComponent); override;
    { Run opens the window and runs a scene of the class until the application
      is terminated. Calling Run again while running switches to a new scene on
      the next frame. If no class is given SceneClass is used. }
    procedure Run(SceneClass: TSceneClass = nil);
    { Terminate asks the application to stop after the current frame }
    procedure Terminate;
    { FilesDropped returns true if files were dropped on the window since the
      last frame }
    function FilesDropped(out Files: StringArray): Boolean;
    { The scene running in the window. Setting it while running switches scenes
      on the next frame, and setting it to nil terminates. }
    property SceneClass: TSceneClass read FSceneClass write FSceneClass;
    { The scene currently running }
    property Scene: TScene read FScene;
    { True while Run is running }
    property Running: Boolean read FRunning;
    { The window caption }
    property Title: string read GetTitle write SetTitle;
    { The size of the window. While running it is the current size. }
    property Width: Integer read FWidth write SetWidth;
    property Height: Integer read FHeight write SetHeight;
    { Fullscreen covers the desktop with the window }
    property Fullscreen: Boolean read GetFullscreen write SetFullscreen;
    { Sizeable and Decorated are used when the window is created }
    property Sizeable: Boolean read FSizeable write FSizeable;
    property Decorated: Boolean read FDecorated write FDecorated;
    { Buffer options used when the window is created. MultiSamples of 0 or 1
      turns multisampling off. If the window cannot be created with
      multisampling it is created without it. }
    property DepthBits: Integer read FDepthBits write FDepthBits;
    property StencilBits: Integer read FStencilBits write FStencilBits;
    property MultiSamples: Integer read FMultiSamples write FMultiSamples;
  end;