On Mon, 16 May 2011 10:28:19 +0000, johnelee1...@googlemail.com
wrote:
> thanks all - btw it wasn't the real code just an example I
made up , the while loop wasn't needed- mistake!
>
>But the q still
remains - having three functions would still give the problem I have
now- that when doing a file_read (my function flag=1) would say 'file
not open' because the handles are volatile & local to file reset - >that
was the point of my original email. Seems as if there is no solution?
>John
Of course there is. As was stated earlier you need to make the
filehandle a global not a local variable. You could also handle it
differently and use a TStringList instead.
var
s: TStrings;
s :=
TStringList.Create;
s.LoadFromFile('MyFile.txt');
//do something with
line 12
writeln(s[12]);
s.Free
Regards, Darius
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
