I know it is reported bug (I reported it myself :), but does see it anybody else? Attached program writes right number of lines, but it doesnt write nor filenames nor file sizes. It works correctly under 1.0.4. I tried to look at RTL sources of both releases, but it seems to be same.

Petr Titera

uses Sysutils;
var
	f : TSearchRec;
	i : LongInt;
begin
	i := FindFirst('*.*', faAnyFile, f);
	repeat
		writeln('#', f.name, '#', f.size, '#');
	until (FindNext(f)  0);
end.