program vCardStudio;

uses
  {$IFDEF UNIX}
  cthreads, clocale,
  {$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, FormMain, Core, Diff, SysUtils, FormCompareSideBySide, TestCases,
  VCardFile, FormColumns, FormCompare, FormNormalize, FormExport, FormImport;

{$R *.res}

{$if declared(UseHeapTrace)}
const
  HeapTraceLog = 'heaptrclog.trc';
{$ENDIF}

begin
  Application.Scaled:=True;
  Application.Title:='vCard Studio';
  {$if declared(UseHeapTrace)}
  DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
  SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog);
  {$ENDIF}
  RequireDerivedFormResource := True;
  Application.Initialize;
  Application.CreateForm(TCore, Core.Core);
  Application.Run;
end.