Скачать: CL | DM;

Распознование   Найти похожие ветки 

← →
Opera ©   (2003-10-01 12:46) [0]

Помогите как узнать файл по его содержимому? Например по 60 байтам в середине программы и если это тот файл вывести мессаг?

---

← →
Digitman ©   (2003-10-01 12:49) [1]

> в середине программы


нет понятие "середина программы"
есть понятие "смещение искомого фрагмента относительно начала файла"

тебе это смещение заранее известно ?

---

← →
Opera ©   (2003-10-01 12:51) [2]

Ну-у-у нет ну как можно проверить тот это файл или нет, помоги

---

← →
Palladin ©   (2003-10-01 13:00) [3]

в орешник

---

← →
BillyJeans ©   (2003-10-01 13:08) [4]

если тебе повезет, и в данные 60 байт войдет какая-либо ключевая комбинация, то считай, что мессагу выводить мона ;)

---

← →
Digitman ©   (2003-10-01 13:17) [5]

1. Находишь любым способом размер файла Len
1. делаешь hMap:= CreateFileMapping(... имя_файла ...)
2. делаешь pMap := MapViewOfFile(hMap, ..)

const
Model: array[0..59] of Byte = .....; здесь - модель поиска
var
i: Integer;
pModel: Pointer; // указатель на модель поиска
pMap : Pointer; // указатель на образ файла в ВАП процесса
Len : Integer; // размер файла
ptr: PByte;
...
pModel := @Model;
ptr := pMap;
...
а далее - цикл :

for i:= 0 to Len - SizeOf(Model) do
if CompareMem(ptr, pModel, SizeOf(Model)) then
break;
else
Inc(ptr);

if i < Len - SizeOf(Model) then
... тот это файл
else
... или нет

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c