* textrec updated to use codepointer

git-svn-id: trunk@24849 -

rtl/inc/textrec.inc

@@ -43,7 +43,7 @@ type
     openfunc,
     inoutfunc,
     flushfunc,
-    closefunc : pointer;
+    closefunc : codepointer;
     UserData  : array[1..32] of byte;
     name      : array[0..textrecnamelength-1] of char;
     LineEnd   : TLineEndStr;