X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/257fdc360d4c80e606358c108c890c5367436a12..refs/heads/delphi2010:/readtxt2.pas

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