Files
lazarus-ccr/applications/lazstats/source/LazStats.lpr
wp_xxyyzz a1d5e0fab0 TwoSLSUnit: Apply usual changes.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7355 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2020-04-04 11:25:29 +00:00

35 lines
656 B
ObjectPascal

program LazStats;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms,
Globals, LicenseUnit, OptionsUnit, MainDM, MainUnit, utils;
{$R LazStats.res}
begin
RequireDerivedFormResource := True;
Application.Title:='';
Application.Scaled:=True;
Application.Initialize;
LoadOptions;
if not LoggedOn then
begin
if AcceptLicenseForm then
LoggedOn := true
else
Application.Terminate;
end;
Application.CreateForm(TMainDataModule, MainDataModule);
Application.CreateForm(TOS3MainFrm, OS3MainFrm);
Application.Run;
end.