Files
lazarus-ccr/components/virtualtreeview-unstable/demos/vtbasic/vtbasic.lpr
blikblum 28313808a3 Started PanningWindow implementation
Fixed some resource files

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@140 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2007-04-04 18:09:47 +00:00

22 lines
452 B
ObjectPascal

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,vtlogger,ipcchannel, lclextensions_package;
begin
Logger.Channels.Add(TIPCChannel.Create);
Logger.Clear;
Logger.ActiveClasses:=[lcScroll,lcWarning];
Application.Initialize;
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
end.