diff options
Diffstat (limited to 'extras/tiopf/demos/Demo_TtiBaseObject/PerformanceTesting.lpr')
-rw-r--r-- | extras/tiopf/demos/Demo_TtiBaseObject/PerformanceTesting.lpr | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/extras/tiopf/demos/Demo_TtiBaseObject/PerformanceTesting.lpr b/extras/tiopf/demos/Demo_TtiBaseObject/PerformanceTesting.lpr deleted file mode 100644 index e43592fd..00000000 --- a/extras/tiopf/demos/Demo_TtiBaseObject/PerformanceTesting.lpr +++ /dev/null @@ -1,31 +0,0 @@ -{ - This demo does performance testing of the TtiBaseObject to see the difference - when Reference Counting is enabled, linked in or not. -} -program PerformanceTesting; - -uses - {$IFDEF UNIX}{$IFDEF UseCThreads} - cthreads, - {$ENDIF}{$ENDIF} - Classes, fpg_main, frm_main; - - -procedure MainProc; -var - frm: TMainForm; -begin - fpgApplication.Initialize; - frm := TMainForm.Create(nil); - try - frm.Show; - fpgApplication.Run; - finally - frm.Free; - end; -end; - -begin - MainProc; -end. - |