X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-editor.git;a=blobdiff_plain;f=src%2Fshared%2FWADEDITOR.pas;h=26110093c33f149d023741811db89865be5183c5;hp=3c6c1a3082fc80c9290ace750a56bc3921b963a0;hb=212386359ea0af4e0a861f9bf92c45a1516ac87c;hpb=1fb1b203de2d204939df9112dda1f72760c956ee diff --git a/src/shared/WADEDITOR.pas b/src/shared/WADEDITOR.pas index 3c6c1a3..2611009 100644 --- a/src/shared/WADEDITOR.pas +++ b/src/shared/WADEDITOR.pas @@ -75,7 +75,7 @@ const implementation uses - SysUtils, BinEditor, ZLib; + SysUtils, BinEditor, ZLib, utils; const DFWAD_OPENED_NONE = 0; @@ -291,7 +291,7 @@ var begin Result := False; - AssignFile(ResourceFile, FileName); + AssignFile(ResourceFile, findFileCIStr(FileName)); try Reset(ResourceFile, 1); @@ -421,7 +421,7 @@ begin if FResData <> nil then FreeMem(FResData); try - AssignFile(WADFile, FFileName); + AssignFile(WADFile, findFileCIStr(FFileName)); Reset(WADFile, 1); b := 6+SizeOf(TWADHeaderRec_1)+SizeOf(TResourceTableRec_1)*Length(FResTable); @@ -578,7 +578,7 @@ begin if FWADOpened = DFWAD_OPENED_FILE then begin try - AssignFile(WADFile, FFileName); + AssignFile(WADFile, findFileCIStr(FFileName)); Reset(WADFile, 1); Seek(WADFile, FResTable[i].Address+6+ @@ -695,7 +695,7 @@ begin FFileName := FileName; - AssignFile(WADFile, FFileName); + AssignFile(WADFile, findFileCIStr(FFileName)); try Reset(WADFile, 1);