program AcronymDecoder; {$mode delphi}{$H+} uses {$IFDEF UNIX} cthreads, clocale, {$ENDIF} Interfaces, // this includes the LCL widgetset Forms, UAcronym, Common, SysUtils, UFormMain, UCore, UFormCheck { you can add units after this }; {$R *.res} {$if declared(UseHeapTrace)} const HeapTraceLog = 'heaptrclog.trc'; {$ENDIF} begin {$if declared(UseHeapTrace)} DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog); SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog); {$ENDIF} Application.Title := 'Acronym Decoder'; RequireDerivedFormResource := True; Application.Initialize; Application.CreateForm(TCore, Core); Application.CreateForm(TFormMain, FormMain); Application.Run; end.