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, FormMerge; {$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.