Re: FreePascal - FindFirst and I/O Handles Used

Wow... thanks for pointing out the FindClose.  Works great!

I'd never have found that on my own.  I wonder how many other TP->FPC 
gotcha's I don't know about.  (Is that an unknown unknown or a known 
unknown? to quote a famous ex US cabinet member).

Jim

Marco van de Voort wrote:
> On 2007-05-04, Jim Bishop <bishopjp@[EMAIL PROTECTED]
> wrote:
>> Is this a compiler bug?  Configuration bug? HW bug?  Or how can I free
a 
>> handle that FindFirst apparantly uses?  Workarounds?
> 
> findclose.  Dos had static filehandles and would just RTE at some point.
> With dynamic filehandles you need it.
> 
> In Delphi (sysutils) it changed to return a value to properly detect if
it
> needs closing, the skeleton then becomes:
> 
> if findfirst(arguments)=<something> then
>   begin
>    repeat 
>    until not findnext or done;
>    findclose
>   end;
> 
> Probably with unit dos you need to check ioresult or doserror to get the
same.
> I can't exactly what, since I have used sysutils pretty much exclusively
> since 2003 (when what would become 2.0. started to mature).
> 
> This also because the sysutils one also allows longer paths on systems
that
> sup****t it, because it is not limited to shortstring length.
> 
> Nearly all unit dos file-io and path functions have a better equivalent
in
> unit sysutils. (the major difference allowing longer paths, which is
quite
> annoying on Unix otherwise)
> 
> 
>