index 13adf3cb958db9f2fe163717b8c574df7eb5b53c..b2551c5a661e7803d8ea043bcd1894a8bd2ab0f5 100644 (file)
ResourceName: String;
Data: Pointer;
Size: Integer;
- Sign: Array [0..4] of Char;
Sections,
Resources: SArray;
a: Integer;
WAD.FreeWAD();
-// Проверка сигнатуры. Если есть - это WAD внутри WAD:
- CopyMemory(@Sign[0], Data, 5);
-
- if not (Sign = DFWAD_SIGNATURE) then
- begin
- WAD.Free();
- FreeMem(Data);
- Exit;
- end;
-
// Пробуем прочитать данные:
if not WAD.ReadMemory(Data, Size) then
begin