program nlve;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}
  cthreads,
  {$ENDIF}
  Interfaces,
  Forms,
  uTheme,
  uMainForm;

{$R *.res}

begin
  RequireDerivedFormResource := True;
  Application.Title := 'nlve';
  Application.Scaled := True;
  Application.Initialize;
  { Цвета меню задаются до создания окон: под gtk2 это строка стиля, а её
    разбирают один раз — уже созданные виджеты о ней не узнают. }
  ApplyMenuStyle;
  { Подписка на появление окон: своим окнам цвета задаются в их же
    обработчике создания, а это подстраховка на случай окна, созданного
    самой библиотекой. }
  HookNewForms;
  Application.CreateForm(TMainForm, MainFormInstance);
  Application.Run;
end.