program Transpascal; {$MODE Delphi} uses {$IFDEF UNIX}{$IFDEF UseCThreads} cthreads, {$ENDIF}{$ENDIF} Forms, Interfaces, SysUtils, UMainForm in 'UMainForm.pas' {MainForm}, UTextSource, UProject, UApplicationInfo, URegistry, ULastOpenedList, UDebugLog, TranspascalCompiler, UProjectManager, UCodeForm, UMessagesForm, UCompiledForm, UCodeTreeForm, TemplateGenerics, Common, UAboutForm; {$R *.res} const HeapTraceLog = 'heaptrclog.trc'; begin Application.Title := 'Transpascal IDE'; // Heap trace // DeleteFile(ExtractFilePath(ParamStr(0)) + HeapTraceLog); // SetHeapTraceOutput(ExtractFilePath(ParamStr(0)) + HeapTraceLog); Application.Initialize; Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TProjectManager, ProjectManager); Application.CreateForm(TCodeForm, CodeForm); Application.CreateForm(TMessagesForm, MessagesForm); Application.CreateForm(TCompiledForm, CompiledForm); Application.CreateForm(TCodeTreeForm, CodeTreeForm); Application.CreateForm(TAboutForm, AboutForm); Application.Run; end.