Subversion Repositories recyclebinunit

Rev

Rev 100 | Rev 102 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 100 Rev 101
Line 892... Line 892...
892 
              // So we assume that the following record will be a valid ANSI record.
 892 
              // So we assume that the following record will be a valid ANSI record.
893 
              list.Add(TRbInfoAItem.Create(fs, AFile));
 893 
              list.Add(TRbInfoAItem.Create(fs, AFile));
894 
            end
 894 
            end
895 
            else
 895 
            else
896 
            begin
 896 
            begin
897 
              // Not enough space to read a Ansi record!
 897 
              // Not enough space to read a ANSI record!
898 
              // Ignore it
 898 
              // Ignore it
899 
            end;
 899 
            end;
900 
          end;
 900 
          end;
901 
        end
 901 
        end
902 
        else
 902 
        else