lazarus-ccr/components/virtualtreeview-unstable/demos/vtbasic/vtbasic.lpr

program vtbasic;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms
  { add your units here }, Main
  {$ifdef DEBUG_VTV}
  ,vtlogger, ipcchannel
  {$endif}
  ;

begin
  {$ifdef DEBUG_VTV}
  Logger.Channels.Add(TIPCChannel.Create);
  Logger.Clear;
  Logger.ActiveClasses := [lcScroll, lcWarning];
  {$endif}
  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
end.