X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2FWADEDITOR.pas;h=de670694b81fe44207506b355c7351b3921ea86c;hb=566d04f0c63d0257e7dd235eba1e047e0d746b68;hp=c9af0bd7fd68617801c85d2caaf6310ed83bf2bb;hpb=9b23fafe854f9ff68379ba581f009beade3f6810;p=d2df-sdl.git diff --git a/src/shared/WADEDITOR.pas b/src/shared/WADEDITOR.pas index c9af0bd..de67069 100644 --- a/src/shared/WADEDITOR.pas +++ b/src/shared/WADEDITOR.pas @@ -163,7 +163,8 @@ begin if not isOpen or (fIter = nil) then Exit; if length(Resource) = 0 then Exit; // just in case if (length(Section) <> 0) and (Section[length(Section)] <> '/') then Section := Section+'/'; - for f := 0 to fIter.Count-1 do + // backwards, due to possible similar names and such + for f := fIter.Count-1 downto 0 do begin fi := fIter.Files[f]; if fi = nil then continue;