readtxt2 allow open files to still be read by others

[lcore.git] / testreadtxt2.dpr

diff --git a/testreadtxt2.dpr b/testreadtxt2.dpr
index a378293bf2af312e0ed21e986f06469943cd4437..1e1d69acde3f11cb0a04d9213094372f9807c1f2 100644 (file)
--- a/testreadtxt2.dpr
+++ b/testreadtxt2.dpr
@@ -1,3 +1,5 @@
+{$apptype console}\r
+\r
 { Copyright (C) 2009 Bas Steendijk and Peter Green\r
   For conditions of distribution and use, see copyright notice in zlib_license.txt\r
   which is included in the package\r