X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/13da3d2110165e8501869e896f1f17706f2058c1..257fdc360d4c80e606358c108c890c5367436a12:/readtxt2.pas?ds=sidebyside

diff --git a/readtxt2.pas b/readtxt2.pas
index 84c5765..8f74e6c 100644
--- a/readtxt2.pas
+++ b/readtxt2.pas
@@ -32,9 +32,9 @@ type
     sourcestream:tstream;
     destroysourcestream:boolean;
     constructor create(asourcestream: tstream; adestroysourcestream:boolean);
-    constructor createf(filename : string);
+    constructor createf(filename : ansistring);
 
-    function readline:string;
+    function readline:ansistring;
     function eof:boolean;
     destructor destroy; override;
   private
@@ -59,7 +59,7 @@ begin
   destroysourcestream := false;
 end;
 
-constructor treadtxt.createf(filename : string);
+constructor treadtxt.createf(filename : ansistring);
 begin
   create(tfilestream.create(filename,fmOpenRead),true);
 end;