On 18 May 2009, at 17:25, Michael Van Canneyt wrote:

On Mon, 18 May 2009, Jonas Maebe wrote:

On 18 May 2009, at 16:39, Leonardo M. Ramé wrote:

By reading the FPC.RTL documentation, I found it says that FindClose must be
used outside the if, as follows:

if FindFirst(Edit1.Text, FileAttrs, sr) = 0 then
begin
repeat
 ...
 ...
until FindNext(sr) <> 0;
end;
FindClose(sr);

Can be this the cause of the problem in my application?.

Yes.

Huh ? Since when is this requirement ?

Since as long as I can remember. It at least predates the switch to svn (revision 1 of both rtl/unix/dos.pp and of rtl/unix/sysutils.pp requires it).


Jonas_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to