program ApplicationShell;

// Atlas VCL application shell: workspace, navigation, command bar, tiles,
// chart, gauges and themes. Pass a file name to save a PNG of the window
// instead of running it interactively; an optional second argument selects
// the page shown in the image (0 Home, 1 Sales, 2 Gauges).

uses
  System.SysUtils,
  Vcl.Forms,
  Atlas.TestVcl,
  Shell.MainForm in 'Shell.MainForm.pas';

var
  Form: TShellForm;

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TShellForm, Form);
  if ParamCount > 0 then
  begin
    if ParamCount > 1 then Form.SelectPage(StrToInt(ParamStr(2)));
    SaveFormImage(Form, ParamStr(1));
  end
  else
    Application.Run;
end.